Help for this page

Select Code to Download


  1. or download this
    my $string = "foobarbaz";
    my $exp = qr/foo/;
    print STDOUT "matching $exp...\n";
    print STDOUT "match!\n" if $string =~ m/$exp/;
    
  2. or download this
    matching (?-xism:foo)...
    match!