perl -pi.bak -e 's/^/sprintf( "%05d", $.).": "/e' test.pl