use strict;
use File::stat;
my $mtime = stat('/your/filename')->mtime;