print OUT "=item Png\n\n" if $DEFINES =~ /HAVE_PNG/; print OUT "=item Gif\n\n" if $DEFINES =~ /HAVE_GIF/; print OUT "=item Gd\n\n=item Gd2\n\n" if $DEFINES =~ /HAVE_GD2/; print OUT "=item Jpeg\n\n" if $DEFINES =~ /HAVE_JPEG/; print OUT "=item Tiff\n\n" if $DEFINES =~ /HAVE_TIFF/; print OUT "=item Xpm\n\n" if $DEFINES =~ /HAVE_XPM/; print OUT "=item Xbm\n\n" if 1 or $DEFINES =~ /HAVE_XBM/; print OUT "=item WBMP\n\n" if 1 or $DEFINES =~ /HAVE_WBMP/; print OUT "=item BMP\n\n" if $DEFINES =~ /HAVE_BMP/; print OUT "=item GifAnim\n\n" if $DEFINES =~ /HAVE_GIFANIM/; print OUT "=item Webp\n\n" if $DEFINES =~ /HAVE_WEBP/; print OUT "=item Heif\n\n" if $DEFINES =~ /HAVE_HEIF/; print OUT "=item Avif\n\n" if $DEFINES =~ /HAVE_AVIF/;
print OUT << '!NO!SUBS!'; =back
Unsupported Image formats:
!NO!SUBS!
print OUT "=item Png\n\n" if $DEFINES !~ /HAVE_PNG/; print OUT "=item Gif\n\n" if $DEFINES !~ /HAVE_GIF/; print OUT "=item Gd\n\n=item Gd2\n\n" if $DEFINES !~ /HAVE_GD2/; print OUT "=item Jpeg\n\n" if $DEFINES !~ /HAVE_JPEG/; print OUT "=item Tiff\n\n" if $DEFINES !~ /HAVE_TIFF/; print OUT "=item Xpm\n\n" if $DEFINES !~ /HAVE_XPM/; print OUT "=item GifAnim\n\n" if $DEFINES !~ /HAVE_GIFANIM/; print OUT "=item Webp\n\n" if $DEFINES !~ /HAVE_WEBP/; print OUT "=item Heif\n\n" if $DEFINES !~ /HAVE_HEIF/; print OUT "=item Avif\n\n" if $DEFINES !~ /HAVE_AVIF/; print OUT "=item BMP\n\n" if $DEFINES !~ /HAVE_BMP/;
The GD.pm interface is copyright 1995-2005, Lincoln D. Stein. It is distributed under the same terms as Perl itself. See the "Artistic License" in the Perl source code distribution for licensing terms.
The latest versions of GD.pm are available on CPAN: