1234 #! /usr/bin/perl -wuse strict;use Perl::Visualize qw/etch/;etch("world.gif", "helloworld.gif", 'print "Hello Spinning World\n"' );
#! /usr/bin/perl -w
use
strict;
Perl::Visualize
qw/etch/
;
etch(
"world.gif"
,
"helloworld.gif"
'print "Hello Spinning World\n"'
);