# $Id$ package Gnome2::Rsvg; use 5.008; use strict; use warnings; use Glib; use Gtk2; require DynaLoader; our @ISA = qw(DynaLoader); our $VERSION = '0.10'; sub dl_load_flags { $^O eq 'darwin' ? 0x00 : 0x01 } Gnome2::Rsvg -> bootstrap($VERSION); 1; __END__ =head1 NAME Gnome2::Rsvg - Perl interface to the RSVG library =head1 SYNOPSIS use Gnome2::Rsvg; my $svg = "path/to/image.svg"; # The easy way. my $pixbuf = Gnome2::Rsvg -> pixbuf_from_file($svg); # The harder way. my $handle = Gnome2::Rsvg::Handle -> new(); open(SVG, $svg) or die("Opening '$svg': $!"); while () { $handle -> write($_) or die("Could not parse '$svg'"); } close(SVG); $handle -> close() or die("Could not parse '$svg'"); $pixbuf = $handle -> get_pixbuf(); =head1 ABSTRACT This module allows a Perl developer to use the Scalable Vector Graphics library (librsvg for short). =head1 SEE ALSO L(3pm), L(3pm), L(3pm) and L =head1 AUTHOR Torsten Schoenfeld Ekaffeetisch at gmx dot deE. =head1 COPYRIGHT AND LICENSE Copyright (C) 2003-2005 by the gtk2-perl team =cut