Help for this page

Select Code to Download


  1. or download this
        my $date = $q->param( 'date' );
        my $filet = $q->param( 'filet');
    
  2. or download this
    #!/usr/local/bin/perl -wT
    use strict;
    
    ...
        print $q->header,start_html," @names $action $time $date filet = $
    +filet",end_html;
        exit;
    }