Select Code to Download

#!/usr/bin/perl

...
undef *Yakkity::Yak::a;
print "a = $Yakkity::Yak::a\n";
print Dumper \%Yakkity::Yak::;

a = 42
$VAR1 = {
...
Undeffing glob
a = 
$VAR1 = {};