# Get both pieces of information we need my ($size, $timestamp) = ((stat $files)[7, 9]); # Convert timestamp $timestamp = POSIX::strftime("%m/%d/%Y %I:%M %p", localtime($timestamp);