Select Code to Download

#!/usr/bin/perl -w
use strict;
...

   return (timegm($sec, $min, $hour, $day, $month, $year));
}