$ echo '1.png' | perl -lpe '$_=sprintf "%07d", $_'
0000001