Create time.pl