if (-e $filepath) {
        # the file exists
        if (-M $filepath > $maxage_days) {
            
            my $exception = {
                table => $tablename,
                exception  => 'outofdate',
                data  => {
                    file => $filepath, 
                    age  => sprintf("%.2f", (-M $filepath)*24) . ' hours',
                    still_copying => 0 
                }
            return ($exception);
            };

else {
        my $exception = {
            table => $tablename,
            exception => 'nonexistent',
            data => {
            	file => $filepath,
            	age => 0,
            	nonexistent => 1
        	}
	};
        return ($exception);
    }


##</code><code>##

    if ($exception eq 'outofdate' or $exception eq 'stillcopying') {
        $biuw->{log}->warn("$FEED_PATH . $FEED_FILE_BASE_NAME is out of date. Loading stopped.\n");
        return $exception
    }

    if ($exception eq 'nonexistent') {
        $biuw->{log}->warn("$FEED_PATH . $FEED_FILE_BASE_NAME does not exist. Loading stopped.\n");
        return $exception;
    }

##</code><code>##

sh: /home/ftp01.mbira.com/reports/futu.data: No such file or directory
md5sum: /home/ftp01.mbira.com/reports/futu.data: No such file or directory