Help for this page

Select Code to Download


  1. or download this
    my $lexicon = $doc->find(sub { $_[1]->content eq '%Lexicon' });
    $lexicon = $lexicon->[0]; # returns an array ref, but in my case, ther
    +e's only ever one.
    
  2. or download this
    my $lexicon = $doc->find_first( ... )