Help for this page
$ perl -le 'my( $l ) = time; my $s = time; print join( "\n", $l, $s )' 1115694879 1115694879