# open file for output
open my $file, ">${title}.xml" or die "Couldn't open file: $title.xml \n\n";
select $file;

## Print lots of XML data here

# open GGobi for viewing
close $file;
system "ggobi.exe ${title}.xml";