For the experienced Perl programmer it's easy to laugh and taunt away about code like

while (<LOG>){ $string .= $_;  }
@array = split(/\n/, $string);
foreach (@array) {
[download]

which be would be more perlish as

while (<LOG>){
  chomp;
[download]

However, you old horses, remember the last time you were exploring a larger Perl module/framework/whatever and failed that Framework::Foo::Bar is actually a subclass of XY::Unknown (via eval in Framework::Factory and some invisible magic in Framework::Magician)

:-D