3 # Released Feb. 17, 1997 by Kyle Shorter (magick@wizards.dupont.com)
8 use vars qw($VERSION @ISA @EXPORT $AUTOLOAD);
15 @ISA = qw(Exporter DynaLoader);
16 # Items to export into callers namespace by default. Note: do not export
17 # names by default without a very good reason. Use EXPORT_OK instead.
18 # Do not simply export all your public functions/methods/constants.
21 Success Transparent Opaque QuantumDepth QuantumRange MaxRGB
22 WarningException ResourceLimitWarning TypeWarning OptionWarning
23 DelegateWarning MissingDelegateWarning CorruptImageWarning
24 FileOpenWarning BlobWarning StreamWarning CacheWarning CoderWarning
25 ModuleWarning DrawWarning ImageWarning XServerWarning RegistryWarning
26 ConfigureWarning ErrorException ResourceLimitError TypeError
27 OptionError DelegateError MissingDelegateError CorruptImageError
28 FileOpenError BlobError StreamError CacheError CoderError
29 ModuleError DrawError ImageError XServerError RegistryError
30 ConfigureError FatalErrorException
36 # This AUTOLOAD is used to 'autoload' constants from the constant()
37 # XS function. If a constant is not found then control is passed
38 # to the AUTOLOAD in AutoLoader.
41 ($constname = $AUTOLOAD) =~ s/.*:://;
42 die "&${AUTOLOAD} not defined. The required ImageMagick libraries are not installed or not installed properly.\n" if $constname eq 'constant';
43 my $val = constant($constname, @_ ? $_[0] : 0);
45 if ($! =~ /Invalid/) {
46 $AutoLoader::AUTOLOAD = $AUTOLOAD;
47 goto &AutoLoader::AUTOLOAD;
50 my($pack,$file,$line) = caller;
51 die "Your vendor has not defined PerlMagick macro $pack\:\:$constname, used at $file line $line.\n";
54 eval "sub $AUTOLOAD { $val }";
58 bootstrap Image::Magick $VERSION;
60 # Preloaded methods go here.
65 my $class = ref($this) || $this || "Image::Magick";
75 my $class = ref($this) || $this || "Image::Magick";
82 # Autoload methods go after =cut, and are processed by the autosplit program.
91 Image::Magick - Perl extension for calling ImageMagick's libMagick methods
96 $p = new Image::Magick;
97 $p->Read("imagefile");
98 $p->Set(attribute => value, ...)
99 ($a, ...) = $p->Get("attribute", ...)
100 $p->routine(parameter => value, ...)
101 $p->Mogrify("Routine", parameter => value, ...)
102 $p->Write("filename");
106 This Perl extension allows the reading, manipulation and writing of
107 a large number of image file formats using the ImageMagick library.
108 It was originally developed to be used by CGI scripts for Web pages.
110 A web page has been set up for this extension. See:
112 file:///usr/local/share/doc/ImageMagick-6.6.0/www/perl-magick.html
113 http://www.imagemagick.org/script/perl-magick.php
115 If you have problems, go to
117 http://www.imagemagick.org/discourse-server/viewforum.php?f=7
121 Kyle Shorter magick-users@imagemagick.org
125 Has all the bugs of ImageMagick and much, much more!