Comment Re:Too hard? (Score 1) 608
Ledskof wrote:
Sounds like visual basic programmers are complaining or something
----
So this snippet from the article is in Visual Basic? That is news to me...
my ($state_var1, $state_var2) = (0, '');
my (%collector1, $collector2);
while () {
next if (/rexexp-for-something-I-ignore/);
if (/something-I'm interested-in/)
{ $state_var1 = &foo($1, $4, \%collector1); }
elsif (/something-else/)
{ $state_var2 = &bar($_, $state_var1); }
elsif (/yet another/)
{
$state_var_1 = $state_var2 + $collector1{baz};
}
else { print; }
}