Help for this page

Select Code to Download

Select or download this

   my $uploadfile = param('upload');
   open(FILE, "$uploadfile") or die "error: $!";
   my $source = <FILE>;
   close (FILE);