Select Code to Download

my $string = q/This is a test./;
my $regex1 = qr(\bis);
my $regex2 = qr(is);
...
# prints
is
isis

my $ip = "192.168.3.5";
$ip = quotemeta $ip;