NAME¶
Image::Info::SVG - SVG support for Image::Info
SYNOPSIS¶
use Image::Info qw(image_info dim);
my $info = image_info("image.svg");
if (my $error = $info->{error}) {
die "Can't parse image info: $error\n";
}
my $title = $info->{SVG_Title};
my($w, $h) = dim($info);
DESCRIPTION¶
This modules supplies the standard key names except for BitsPerSample,
Compression, Gamma, Interlace, LastModificationTime, as well as:
- ImageDescription
- The image description, corresponds to <desc>.
- SVG_Image
- A scalar or reference to an array of scalars containing the URI's of
embedded images (JPG or PNG) that are embedded in the image.
- SVG_StandAlone
- Whether or not the image is standalone.
- SVG_Title
- The image title, corresponds to <title>
- SVG_Version
- The URI of the DTD the image conforms to.
METHODS¶
process_file()
$info->process_file($source, $options);
Processes one file and sets the found info fields in the $info object.
FILES¶
This module requires XML::Simple.
SEE ALSO¶
Image::Info, XML::Simple, expat
NOTES¶
For more information about SVG see:
http://www.w3.org/Graphics/SVG/
Random notes:
Colors
# iterate over polygon,rect,circle,ellipse,line,polyline,text for style->stroke: style->fill:?
# and iterate over each of these within <g> too?! and recurse?!
# append <color>'s
# perhaps even deep recursion through <svg>'s?
ColorProfile <color-profile>
RenderingIntent ?
requiredFeatures
requiredExtensions
systemLanguage
AUTHOR¶
Jerrad Pierce <belg4mit@mit.edu>/<webmaster@pthbb.org>
This library is free software; you can redistribute it and/or modify it under
the same terms as Perl itself.