11 |
|
|
12 |
=head1 VERSION |
=head1 VERSION |
13 |
|
|
14 |
Version 0.04 |
Version 0.05 |
15 |
|
|
16 |
=cut |
=cut |
17 |
|
|
18 |
our $VERSION = '0.04'; |
our $VERSION = '0.05'; |
19 |
|
|
20 |
=head1 SYNOPSIS |
=head1 SYNOPSIS |
21 |
|
|
464 |
if ($self->{'lookup'}) { |
if ($self->{'lookup'}) { |
465 |
if ($self->{'lookup'}->can('lookup')) { |
if ($self->{'lookup'}->can('lookup')) { |
466 |
my @lookup = $self->{lookup}->lookup($format); |
my @lookup = $self->{lookup}->lookup($format); |
467 |
$log->debug('lookup $format', join(", ", @lookup)); |
$log->debug("lookup $format", join(", ", @lookup)); |
468 |
return @lookup; |
return @lookup; |
469 |
} else { |
} else { |
470 |
$log->warn("Have lookup object but can't invoke lookup method"); |
$log->warn("Have lookup object but can't invoke lookup method"); |