$ touch foo.txt
$ perl -wle 'print scalar localtime( ( stat "foo.txt" )[9] )'
Fri Jun  8 19:38:29 2007