Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w 
    
    ...
    
    my $systime = timelocal(@now);
    print "$systime\n";
    
  2. or download this
    my $systime = time;
    my $timestamp = strftime "%Y%m%d%H%M%S", localtime $systime;