Another way to write that:

perl -e'printf "%3\$02d:%2\$02d:%1\$02d\n", gmtime 974'


:-)
[download]