$string =~ s/[\123\124\145]//g;