>perl -E"use bignum; use Time::HiRes qw( time ); say( (10000000 * time) + 621355968000000000 );"
634868277695085200