Help for this page
use strict; use warnings; use Win32::OLE; ... print $fh $svg->xmlify(); close $fh; $xl->Quit;