#!/usr/local/bin/perl -w
#Example 1
$string = "Perl is superlative to other languages";
#@matches= $string =~ /Perl/g;
@matches = $string =~ /Perl/ig;
print "@matches\n";