Re: Two questions about XML::Generator

On Tue, 18 Dec 2007 00:51:44 +0000, Ben Morrow
wrote:

>There is no way to change the variable map uses: whenever I write a map
>the extends over more than a couple of lines, I start it like
>
> map {
> my $entry = $_;
> ...
> } ...
>
>so I get a variable with a real name.

Actually one (I for one) cannot but appreciate Perl 6's "pointy" subs:

pugs> say map -> $s, $t { $s x 2, uc $t }, 'a'..'g';
aaBccDeeFgg


Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^ ..'KYU;*EVH[.FHF2W+#"\Z*5TI/ER 256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,