Help for this page

Select Code to Download


  1. or download this
    if (!defined ($tag_search) &&  !defined ($attr_search))
{
    $ok = 0;
    return($ok, "No values for tag searched");
}
  2. or download this
    return (0, "No values for tag searched")
    unless defined $tag_search and defined $attr_search;
  3. or download this
    my $tag   = @{$tagstruct}[0];
# versus
my $tag   = $tagstruct->[0];
  4. or download this
    use HTML::TokeParser;

my @forbid  = $self->test_tags( 'tag_forbid', $content, $case_re );
...

    return @results;
}