Image::WMF - Perl extension for creating Windows Metafile images on UNIX.
use Image::WMF; my $im = new Image::WMF(200,200); my $red = $im->colorAllocate(255,0,0); my $blue = $im->colorAllocate(0,0,255); $im->filledRectangle(20,20,50,50,$red); $im->string(gdSmallFont,20,20,"My first WMF!", $blue); $wmfdata = $im->wmf; open(OUT, ">test.wmf") or warn "Can't create WMF file: $!\n"; print OUT $wmfdata; close(OUT);
This module is designed to provide the same interface to creating Windows metafiles as that presented by the GD module (fore creating PNG images).
Consult the GD module for basic API documentation.
None by default.
Tony Cox, <email@example.com>