Select Code to Download

my $filename = 'your_file_name_here';
my $mtime = (stat $filename)[9];
my $year = (localtime $mtime)[5] + 1900;