Help for this page

Select Code to Download

Select or download this
```
$repl = '\";`hacked`;\"';
```

Select or download this

sub munge_string {
    my ( $str, $pat, $repl ) = @_;
...
    $str =~ s/$pat/$repl/eeg;
  return $str;
}