##
if ($FORM{'resume'}) {
#read in the resume's data
my ($data,$size);
while( $size = read( $FORM{'resume'}, $data, 1024) ) {
$FORM{'resume_data'} .= $data;
$FORM{'resume_size'} += $size;
}
}
####
open (FH, ">/tmp/resume.$$") || die;
while (<$FORM{'resume'}>) { print FH; }
close (FH);