use Imager;

my $img=Imager->new(xsize=>400,ysize=>300,channels=>4); #needed?
$img->line(color=>'#444444', x1=>10, x2=>100, y1=>20, y2=>50, aa=>1, endp=>1 );

...missing something?...