Help for this page

Select Code to Download


  1. or download this
        ...
    my @hits = ();
...
    }                           # (end of this little "for loop"
    if ($got_a_pattern)  {
        ...
  2. or download this
        ...
    for my $chr ( split //, $doword ) {
...
    }
    if ($got_a_pattern)  {
        ...
  3. or download this
        foreach (@template2) {
        $_  =~ tr/ //d;
        if ($_ eq " ") { next; }
        push @template,$_;
    }
  4. or download this
            tr/ //d;
        push @template, $_  if ($_);  # true when $_ is not an empty s
+tring