use Imager;
use List::Util qw(sum max);
-our $VERSION = '1.00';
+our $VERSION = '1.01';
our %COL = (
bg => Imager::Color->new(255, 255, 255),
sub level {
my ($self, $level) = @_;
+ $level or return;
my $field = Imager->new(xsize => $level->{width}, ysize => $level->{height});
$field->box(filled => 1, color => $COL{bg});