Help for this page
if ($self->hungry()) { $self->go_eat(); ... } ....
my @dispatch = ( [ sub { $_[0]->is_hungry }, sub { $_[0]->go_eat } ], ... $choice->[1]->( $self ); last; }
www.com | www.net | www.org
No recent polls found
