Help for this page

Select Code to Download


  1. or download this
    perl -le '$foo = "bar"; $h->{foo} = \$foo; undef $h->{foo}; print "foo
+ :$foo:"'
foo :bar:
  2. or download this
    perl -le '$foo = "bar"; $h->{foo} = \$foo; undef ${$h->{foo}}; print "
+foo :$foo:"'
foo ::