Select Code to Download

#!/usr/bin/perl -w

...
if(exists($foo{qux})) {
    print "\$foo{qux} popped into existence\n";
}