maps with complex bodies would be good. If you have one or more such beasts, would you leave a comment with them?The talk will be given at The Pittsburgh Perl Workshop.
Thursday, September 2, 2010
I need a few lines of nasty Perl 5 code.
I am writing a talk for beginning Perl 5 programmers covering how to read a line of code and I need a few nasty lines that are fairly self contained. These should be normal lines of code (no obfuscation), they just need to have a lot going on in them. Things involving multiple
The talk will be given at The Pittsburgh Perl Workshop.
The talk will be given at The Pittsburgh Perl Workshop.
Subscribe to:
Post Comments (Atom)
From Perl::Dist::WiX::BuildPerl::_get_cpan_upgrades_list (you can get a properly indented version there, the first few lines are context):
ReplyDeletemy @modulelist = CPAN::Shell->expand('Module', '/./');
# Schwartzian transform from CPAN.pm.
my @expand;
@expand = map {
$_->[1]
} sort {
$b->[0] <=> $a->[0]
||
$a->[1]{ID} cmp $b->[1]{ID},
} map {
[$_->_is_representative_module,
$_
]
} @modulelist;
Web::Simple's Web::Simple::DispatchParser::_parse_spec has some good tricks like do{} blocks, hash slices, push-ors, and other niceties. It was created by mst for the "Antiquated Perl" talk, after all..
ReplyDelete