http://www.perlmonks.org?node_id=862761


in reply to Re: XML::Rules: Can hierarchy be changed?
in thread XML::Rules: Can hierarchy be changed?

sub { $_[1]->{text} = $_[1]->{_content}, delete $_[1]->{_content}, ret
+urn ($_[0] => [$_[1]] , [$_[0] => $_[1]])}

[download]
is better written as 
sub { $_[1]->{text} = $_[1]->{_content}; delete $_[1]->{_content}; ret
+urn ($_[0] => [$_[1]] , [$_[0] => $_[1]])}

[download]
You can put several statements into an anonymous subroutine so no need to use commas where you mean semicolons :-)

Jenda
Enoch was right!
Enjoy the last years of Rome.

In Section Seekers of Perl Wisdom