perl: create a "light"-letter
Posted: 2012-11-21T01:48:44-07:00
hi !
i want to make icon with "light" letter - but there are only bold.
my source:
could someone help me ?
regards Jan
i want to make icon with "light" letter - but there are only bold.
my source:
Code: Select all
#!/usr/bin/perl
use strict;
use warnings;
use Image::Magick;
foreach (100..130){
my $img = Image::Magick->new();
$img->Set(size=>'30x20');
$img->ReadImage('xc:none');
$img->Annotate( text => $_, gravity=>'Center', family => 'Arial', stroke => 'Black', pointsize => 9, style=>'Normal');
#$img->Display();
$img->Write("rec_green_30x20_".$_.".png");
}regards Jan