my $filename = 'somescript.pl';
my $ctime = (stat $filename)[10];