perl -ne 'printf("%010d\n",$_)'