Select Code to Download

   #!/usr/bin/perl -w
    use strict;
...
    
    # now render the SVG object, implicitly use svg namespace
        print $svg->xmlify;

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.0//EN" "http://www.w3.org/TR/2
+001/REC-SVG-20010904/DTD/svg10.dtd">
...
    Info: http://www.roitsystems.com/
 -->
</svg>