Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

use strict;
...
 return $formatted_time;
 
}   ## end format time sub
  2. or download this
    #!/usr/bin/perl
#use strict;
use warnings;
...
}
close OUT;
  3. or download this
    #!/usr/bin/perl

use DBI;
...

END {
 $dbh->disconnect if $dbh }