my $filename = "Test.txt";
print "$filename was last modified on: ", scalar localtime((stat($filename))[9]), "\n";