perl -E 'say +(localtime)[1]'