my $file_content = do{ local( @ARGV,$/) = './INPUTFILE'; <> };