C:\QA\Projects\Perl>perl QAServerSetup.pl
Can't locate Object/MultiType.pm in @INC (@INC contains: C:\Perl\lib\PLJava-0.04
 C:/Perl/site/lib C:/Perl/lib .) at C:/Perl/lib/XML/Smart.pm line 18.
BEGIN failed--compilation aborted at C:/Perl/lib/XML/Smart.pm line 18.
Compilation failed in require at QAServerSetup.pl line 3.
BEGIN failed--compilation aborted at QAServerSetup.pl line 3.

##</code><code>##

#!/bin/perl -w
use lib 'C:\Perl\lib\PLJava-0.04';
use XML::Smart;

## Create a null XML object:
my $XML = XML::Smart->new() ;

## Add a xml server to the list:
$XML->{configuration} = {
    version => '0.7.1.136' ,
    savepassword => 'True' ,
} ;
$XML->save('newfile.xml') ;