Help for this page

Select Code to Download


  1. or download this
    my $itemPart = "Group1]Item2";
    my @items = (
    ...
    else {
        print "Not Found!\n";
    }
    
  2. or download this
    my @matching = grep /\Q$itemPart\E/o, @items;