Help for this page
for (my $i = 0; $i < scalar @{$self->{'trolley'}}; $i++) { ... } }
for ( my $i = $#{ $self->{ trolley } }; $i >= 0; --$i ) { ... } }
www.com | www.net | www.org
No recent polls found
