Help for this page

Select Code to Download


  1. or download this
    <!DOCTYPE HTML><html><body>

...

</body>
</html>
  2. or download this
    #!/usr/bin/perl

...
print "fh is not defined!" if(!defined($fh));

print "$_\n" while(<$fh>);
  3. or download this
    params are emailupload submit-button
fh contains and is a SCALAR
fh is not defined!
  4. or download this
    #!/usr/bin/perl

...
my $fh = $query->upload('emailupload');

print "$_\n" while(<$fh>);