/src/bin/oops/otehnoes
if(/ok .*$/) {
if(m/a good match/( {
$string =~ s/[a-f]//g; # but print this line
( $string ) = ( $string =~ /(show this)/));
/but show\/this, too/
my $dontprint this = "/var/cache/dictionaries-common";