I've used this to make a blank white greyscale image:

my $image = Imager->new( xsize=>$X, ysize=>$Y, channels=>1 );
$image->box(filled=>1, color=> Imager::Color->new(255,255,255) );
[download]

You might try passing the Imager::Color object instead of '#444444' to the $img->line() method...