3 # Reference implementation for symbol table testing.
11 } elsif ($F[0] eq "get") {
12 if (exists($a{$F[1]})) {
17 } elsif ($F[0] eq "del") {
18 if (exists($a{$F[1]})) {
23 } elsif ($F[0] eq "count") {
24 print int(keys(%a)), "\n";
25 } elsif ($F[0] eq "show") {
30 foreach $k (sort(keys(%a))) {