open (FILE, "a.txt");
$/=undef;
$txt = <FILE>;
$txt =~ s/whatever//sig;