perl -e "my @x = clock(); sub clock { return localtime(); } print @x;"
404851301092120