Help for this page

Select Code to Download


  1. or download this
    use WordList;
    
    ...
    if (exists $h{foo}) { print "It's there!" }
    if ($h{foo}) { print "There too!" }
    print keys %h;
    
  2. or download this
    package WordList;
    use Search::Dict;
    ...
    sub DELETE {}
    sub CLEAR {}
    1;