Hi,

i have the following thing, i know $picture and $pictures are not empty and
has the path to the C drive
But the script doesn't  read the file i don't know why?
$save_location is a good path.

IF you know where is the error please tell me
Thanx SCRIPT BELOW

if ($picture =~ /([^\/\\]+)$/) {

$Filename = $1;

$Filename =~ s/^\.+//;


}


open(OUTPUT, ">$save_location/$Filename");

$flen=0;

while (read($pictures,$i,1024)) {

print OUTPUT $i;

$flen = $flen + 1024;

}

close(OUTPUT);

print "Content-type: text/html\n\n";

print "Length: ",$flen/1024,"Kb<p>\n";

print "File saved!<p>\n";




-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to