Hi Monks, I'm using a Perl upload script to upload images to a folder on the server. It works, but is there anyway I can grab the dimensions of the photo and set it to a variable while uploading? I'm using some javascript to grab the filename and stuff it in the parent window's form, but I don't have the width and height which I need to stuff in my database. Here is the upload routine:

open(OUTFILE, ">$target_dir\/$Filename") || die "<font color=red><b>Er
+ror: </b></font>Cannot open file";

         
           
        undef $BytesRead;
        undef $Buffer;  
while ($read_bytes = read($Full_name,$Buffer,1024)) { #read file for u
+ploading one K at a time
            $total_bytes += $read_bytes;
            print OUTFILE $Buffer;
        }
        
        $Confirmation{$Filename} = $total_bytes;
        close($Full_name);
        close(OUTFILE);
        
        chmod (0777, "$target_dir\/$Filename");
        }
}  

$max_filesize = "46080";  #45K
$File = "$target_dir\/$Filename";
[download]