Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

$string = "a\@b.c\n";
...
$qm3 = quotemeta('a@b.c');
$string3 =~ s#$qm3#email-address#g;
print $string3;

Select or download this
```
a@b.c
email-address
email-address
```