perl - Perl：将（x，y）像素绘制到单色位图的推荐方法

Question

对于家庭项目，我需要将 (x,y) 坐标绘制到 400x400 黑白位图上。

你会推荐什么 perl 模块，什么图像格式（GIF？、PNG？其他？）在 OS X、Windows、Linux 上最容易处理？

---

编辑 我的解决方案，基于 GD，由 Brian Agnew 推荐

---

use strict;
use warnings;
use GD;
my $BitMap = GD::Image->new(400,400);

my $white = $BitMap->colorAllocate(255,255,255);
my $black = $BitMap->colorAllocate(0,0,0);       

# Frame the BitMap
$BitMap->rectangle(0,0,399,399,$black);
# Transparent image, white background color
$BitMap->transparent($white);

# plot some, just to show it works #
for my $x (0..100) {
   for my $y (0 .. 100) {
      $BitMap->setPixel(250+100*sin($x)-$y,150+125*cos($x)+$y,$black); 
   }
}

# write png-format to file
open my $fh,">","test.png" or die "$!";
binmode $fh;
print $fh $BitMap->png;
close($fh);

---

Answer 1

查看GD 模块（与GD 库接口）。它使创建图形变得非常简单，并且具有多种输出格式，包括 PNG 和 GIF。