Help for this page

Select Code to Download


  1. or download this
    my $monaco = GD::Font->load('/System/Library/Fonts/Monaco.dfont')
  or die "Can't load monaco!";
  2. or download this
    #!/usr/bin/perl
use GD;
...
open (IMG, ">$0.png");
print IMG $img->png;
close IMG;
  3. or download this
    #!/usr/bin/perl
use strict;
...
print IMAGE $im->png;
close IMAGE;