...
my $inow_fas = "/inow/index-data/sfs-fas/fas.txt";
die "Error: $inow_fas does not exist" unless ( -e $inow_fas );
print STDERR "$inow_fas: modified ", int( -M _ ), " day(s) ago\n";
...