Help for this page

Select Code to Download

Select or download this

$ perl -we'*$_ = sub { print "I am 1 $_[1].\n" } for 1; $x = bless {};
+ $meth = "1"; $x->$meth("world")'
I am 1 world.