in reply to "if" Considered Harmful in OO programming
Just a nit:
unless (grep { $array_ref->[0] eq $_ } keys %token) {
is better as:
unless (exists $token{$array_ref->[0]}) {
In Section
Meditations
in reply to "if" Considered Harmful in OO programming
Just a nit:
unless (grep { $array_ref->[0] eq $_ } keys %token) {
is better as:
unless (exists $token{$array_ref->[0]}) {