or even ...package Banker; no strict; no warnings; use base qw/Greedy SelfAggrandising MorallyBereft/; 1;
while (my ($banker, $rubbish) = each %bankers) { delete $bankers{$banker}; }
In reply to Re^2: If the universe was more like Perl, I would...
by Bloodnok
in thread If the universe was more like Perl, I would...
by cavac
For: | Use: | ||
& | & | ||
< | < | ||
> | > | ||
[ | [ | ||
] | ] |