Help for this page

Select Code to Download


  1. or download this
        print POSIX::strftime("%m-%d-%Y",localtime()),"\n";
    
  2. or download this
      my $start_date_string = '05-03-2003';
      my @date_parts = split('-',$start_date_string);
    ...
                . " was after "
                . POSIX::ctime($now_time) . "\n";
      }