http://qs1969.pair.com?node_id=478897


in reply to What is this doing, and why is this a good method of doing it?

Does this capture the essence?
my @x = somefunction(); my @xs = map { { name => $_, sub => sub { ... }, } } @x; for (@xs) { no strict 'refs'; *{ $_->{name} } = $_->{sub}; }
-nuffin
zz zZ Z Z #!perl