use POSIX 'strftime'; for (glob '*') { printf "%s\t%s\n", $_, strftime('%B %d', gmtime((stat)[9])); }