Help for this page

Select Code to Download

Select or download this

$ perl -le '
> use strict; use warnings;
...
> print q{bill@bloggs.com} =~ m{[\$&<>\@/]} ? q{Yep} : q{Nope};'
Yep
$