my $days_old = (-M $filename.$file); #### my $days_old = -M $filename;