my $courier = GD::Font->load('./courierR12.fnt') or die "Can't load font $!";