Help for this page

Select Code to Download

Select or download this
```
perl -d <Your-program-file-name>
```

Select or download this

  DB<1> s
main::(junk.pl:10):     print $rec->{TEXT},"\n",
...
  DB<4> x  $rec -> {LOOKUP} {dog}
0  'hound'
  DB<5> q