Help for this page

Select Code to Download


  1. or download this
     $valid   = POSIX::mktime(@start, $date, $mnth, $yr);
     $valid  += $add * (24*60*60);
     # Check for daylight savings adjustment
     my $dst  = $start[2] - +(localtime $valid)[2];
     $valid  += $dst * 60 * 60; my $now = time;