1package Image::Magick::@MAGICK_ABI_SUFFIX@;
2
3#  Copyright 1999-2021 ImageMagick Studio LLC, a non-profit organization
4#  dedicated to making software imaging solutions freely available.
5#
6#  You may not use this file except in compliance with the License.  You may
7#  obtain a copy of the License at
8#
9#    https://imagemagick.org/script/license.php
10#
11#  Unless required by applicable law or agreed to in writing, software
12#  distributed under the License is distributed on an "AS IS" BASIS,
13#  WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
14#  See the License for the specific language governing permissions and
15#  limitations under the License.
16#
17#  Initial version, written by Kyle Shorter.
18
19use strict;
20use Carp;
21use vars qw($VERSION @ISA @EXPORT $AUTOLOAD);
22
23require 5.002;
24require Exporter;
25require DynaLoader;
26require AutoLoader;
27
28@ISA = qw(Exporter DynaLoader);
29# Items to export into callers namespace by default. Note: do not export
30# names by default without a very good reason. Use EXPORT_OK instead.
31# Do not simply export all your public functions/methods/constants.
32@EXPORT =
33  qw(
34      Success Transparent Opaque QuantumDepth QuantumRange MaxRGB
35      WarningException ResourceLimitWarning TypeWarning OptionWarning
36      DelegateWarning MissingDelegateWarning CorruptImageWarning
37      FileOpenWarning BlobWarning StreamWarning CacheWarning CoderWarning
38      ModuleWarning DrawWarning ImageWarning XServerWarning RegistryWarning
39      ConfigureWarning ErrorException ResourceLimitError TypeError
40      OptionError DelegateError MissingDelegateError CorruptImageError
41      FileOpenError BlobError StreamError CacheError CoderError
42      ModuleError DrawError ImageError XServerError RegistryError
43      ConfigureError FatalErrorException
44    );
45
46$VERSION = '@PACKAGE_BASE_VERSION@';
47
48sub AUTOLOAD {
49    # This AUTOLOAD is used to 'autoload' constants from the constant()
50    # XS function.  If a constant is not found then control is passed
51    # to the AUTOLOAD in AutoLoader.
52    no warnings;
53
54    my $constname;
55    ($constname = $AUTOLOAD) =~ s/.*:://;
56    die "&${AUTOLOAD} not defined. The required ImageMagick libraries are not installed or not installed properly.\n" if $constname eq 'constant';
57    my $val = constant($constname, @_ ? $_[0] : 0);
58    if ($! != 0) {
59    	if ($! =~ /Invalid/) {
60	        $AutoLoader::AUTOLOAD = $AUTOLOAD;
61	        goto &AutoLoader::AUTOLOAD;
62    	}
63    	else {
64	        my($pack,$file,$line) = caller;
65	        die "Your vendor has not defined PerlMagick macro $pack\:\:$constname, used at $file line $line.\n";
66    	}
67    }
68    eval "sub $AUTOLOAD { $val }";
69    goto &$AUTOLOAD;
70}
71
72bootstrap Image::Magick::@MAGICK_ABI_SUFFIX@ $VERSION;
73
74# Preloaded methods go here.
75
76sub new
77{
78    my $this = shift;
79    my $class = ref($this) || $this || "Image::Magick::@MAGICK_ABI_SUFFIX@";
80    my $self = [ ];
81    bless $self, $class;
82    $self->set(@_) if @_;
83    return $self;
84}
85
86sub New
87{
88    my $this = shift;
89    my $class = ref($this) || $this || "Image::Magick::@MAGICK_ABI_SUFFIX@";
90    my $self = [ ];
91    bless $self, $class;
92    $self->set(@_) if @_;
93    return $self;
94}
95
96# Autoload methods go after =cut, and are processed by the autosplit program.
97
98END { UNLOAD () };
99
1001;
101__END__
102
103=head1 NAME
104
105Image::Magick::@MAGICK_ABI_SUFFIX@ - objected-oriented Perl interface to ImageMagick (@MAGICK_ABI_SUFFIX@). Use it to create, edit, compose, or convert bitmap images from within a Perl script.
106
107=head1 SYNOPSIS
108
109  use Image::Magick::@MAGICK_ABI_SUFFIX@;
110  $p = new Image::Magick::@MAGICK_ABI_SUFFIX@;
111  $p->Read("imagefile");
112  $p->Set(attribute => value, ...)
113  ($a, ...) = $p->Get("attribute", ...)
114  $p->routine(parameter => value, ...)
115  $p->Mogrify("Routine", parameter => value, ...)
116  $p->Write("filename");
117
118=head1 DESCRIPTION
119
120This Perl extension allows the reading, manipulation and writing of
121a large number of image file formats using the ImageMagick library.
122It was originally developed to be used by CGI scripts for Web pages.
123
124A web page has been set up for this extension. See:
125
126	 https://imagemagick.org/script/perl-magick.php
127
128If you have problems, go to
129
130   https://github.com/ImageMagick/ImageMagick/discussions/categories/development
131
132=head1 AUTHOR
133
134Kyle Shorter	magick-users@imagemagick.org
135
136=head1 BUGS
137
138Has all the bugs of ImageMagick and much, much more!
139
140=head1 SEE ALSO
141
142perl(1).
143
144=cut
145