ÇÑ°³ÀÇ ÆÄÀÏ Ã·ºÎ´Â °¡´ÉÇѵ¥ 3°³ Á¤µµ ¸¸µé·Á°í ÇÏ´Ï
½±Áö°¡ ¾Ê±º¿ä..
÷ºÎ ÆÄÀÏÀ» ÀÔ·Â ¹ÞÀ» °æ¿ì ÆÄÀÏ À̸§À» ÃßÃâÇÏ¿© ÀúÀåÀ»
ÇÏ´Â ºÎºÐÀ» ¾î¶»°Ô ¼öÁ¤ÇØ¾ß ÇÏ´ÂÁö ±Ã±ÝÇÕ´Ï´Ù.

$upfile = $FORM{
file_name
};
@a = split(/"/,$real_file);
@b = split(/\/,$a[3]);
$t = @b;
$org_name = ($b[$t-1]);
$filename = "$main_dir/files/".$org_name;
if(-e $filename){
$err = exist;
&error;
}
open(FILE, ">$filename") || exit(1);
binmode FILE;
print FILE $upfile;
close FILE;
À§¿¡ ¼Ò½º´Â 1°³À϶§ ÇÏ´Â °ÍÀε¥ ¾î¶»°Ô ¼öÁ¤À» Çؾß
3°³ÀÇ Ã·ºÎ ÆÄÀÏÀ» »ç¿ëÇÒ¼ö ÀÖ´ÂÁö ¾Ë·Á ÁÖ¼¼¿ä..