$file = "path/to/file"; open( FILE, "<", "$file") or die $!\n"; $_ = do { local $/; }; close(FILE); $not_filtered = $_; s/match/replace/gi; s/match1/replace1/gi; print $_;