Help for this page

Select Code to Download

Select or download this

my $str1 = "beer=10&otherstuff&vodka=20&otherstuff&chips=100";
my $str2 = "beer=10&otherstuff&juice=20&otherstuff&chips=100";
...
$str2 =~ /$re/? print "matches\n" : print "doesn't match\n";
print "$1  $2   $3   $4 \n";
}

Select or download this

matches
10  vodka=20   vodka   20 
matches
10  juice=20   juice   20