[SOLVED] How do I install a Perl Module?

A) Start CPAN Shell:
# perl -MCPAN -e shell

B) Install a perl module:
At cpan> shell prompt install module using install module::Name command. For example install module called MIME::Lite:
# cpan> install MIME::Lite
Alternatively, try out the following command:
# cpan -i MIME::Lite

Source: How do I install a Perl Module?.

How can I count the number of occurrences of a substring within a string?

If you want a count of a certain character (X) within a string, you can use the tr/// function like so:

    $string="ThisXlineXhasXsomeXx'sXinXit":
    $count = ($string =~ tr/X//);
    print "There are $count Xs in the string";

This is fine if you are just looking for a single character. However, if you are trying to count multiple character substrings within a larger string, tr/// won't work. What you can do is wrap a while loop around a pattern match.

    $string="-9 55 48 -2 23 -76 4 14 -44";
    $count++ while $string =~ /-\d+/g;
    print "There are $count negative numbers in the string";

perl.com

PERL: Snippet which traverses from root folder to sub folder inside it

"#!/usr/bin/perl
use strict;

&smash("/archive");

sub smash {
my $dir = shift;
opendir DIR,
$dir or return;
my @contents = map "$dir/$_", sort grep !/^\.\.?$/, readdir DIR;
closedir DIR;
foreach (@contents) {
next unless !-l && -d;
&smash($_);
}
}" forums.devshed.com

Perl File Handling: open, read, write and close files

"open FILE, ">file.txt" or die $!;
print FILE $str;
close FILE;" perlfect.com

How do I install Perl modules?

"Installing a new module can be as simple as typing perl -MCPAN -e 'install Chocolate::Belgian'" cpan.org