can someone help me to exclude below the error.
Thanks in advance
Can't locate XML/Writer.pm in @INC (@INC contains: /home/svceln/usr/lib/perl5/site_perl/5.16.2/x86_64-linux /home/svceln/usr/lib/perl5/site_perl/5.16.2 /home/svceln/usr/lib/perl5/5.16.2/x86_64-linux /home/svceln/usr/lib/perl5/5.16.2 .) at /opt/apps/tomcat_scripts/allocate_ports.pl line 7. BEGIN failed--compilation aborted at /opt/apps/tomcat_scripts/allocate_ports.pl line 7. Error in allocating ports, server.xml cannot run`
The script i am using
#!/home/svceln/usr/bin/perl -w
# allocate_ports.pl
# allocate ports, create port_config.xml and write to stdout
use strict;
use XML::Writer;
use IO::File;enter code here
use File::Basename;
my ($increment) = 0;
my ($execDir) = dirname($0);
$#ARGV eq 0 or die "Usage: allocate_ports.pl server_name\n";
my ($port_read) = new IO::File ("$execDir/port_increment.txt");
if (defined $port_read) {
while (<$port_read>) {
chomp;
$increment = $_;
}
$port_read->close() or die "Can't close port_increment.txt: $!";
} else {
$increment = 0;
}