Can't locate object method "new" via package "XML::Writer" at /apollo/volume/software/application/artemis/bin/KapowStarter.pl line 371.

sub SQLtoXML { 
 
  $log->debug("Attempting to pull from MySQL DB and write to XML.." . "\n"); 
 
  #Parameter being passed is the Source ID to check against the Database and final directory for XML file. 
  my $PassedSource = $_[0]; 
  my $FinalDir = $_[1]; 
 
  my $FileName = ""; 
   
  #Set up temporary XML output file for XML::Writer 
  my $output = IO::File->new(">output.xml"); 
 
  #Initiate XML::Writer 
  my $writer = XML::Writer->new(OUTPUT => $output);

[root@099-91-RKB01 ~]# cat test.pl
#!/usr/bin/perl

use strict;
use warnings;
use IO::File;
use XML::Writer;

#Set up temporary XML output file for XML::Writer
my $output = IO::File->new(">output.xml");

#Initiate XML::Writer
my $writer = XML::Writer->new(OUTPUT => $output);

[root@099-91-RKB01 ~]# ./test.pl
[root@099-91-RKB01 ~]# vim test.pl
[root@099-91-RKB01 ~]# cat test.pl
#!/usr/bin/perl

use strict;
use warnings;
use IO::File;
#use XML::Writer;

#Set up temporary XML output file for XML::Writer
my $output = IO::File->new(">output.xml");

#Initiate XML::Writer
my $writer = XML::Writer->new(OUTPUT => $output);

[root@099-91-RKB01 ~]# ./test.pl
Can't locate object method "new" via package "XML::Writer" (perhaps you forgot to load "XML::Writer"?) at ./test.pl line 12.