No problem:

  $data =~ s/&/&/g;
  $data =~ s/</&lt;/g;
  $data =~ s/>/&gt;/g;
  print "<Node1>$data</Node1>\n";
[download]

Of course, you should know that you don't need administrative rights to use Perl modules. Just put them in a directory of your own and push that library onto @INC. For example, if I installed XML::Writer as /home/sam/modules/XML/Writer.pm I'd say:

  BEGIN { push(@INC, '/home/sam/modules'); }
  use XML::Writer;
[download]

Give it a try!

-sam