String Perl

  1. Home
  2. Perl
  3. String
  4. Using pos to display pattern match positions
#!/usr/local/bin/perl 
$string = "Mississippi"; 
while ($string =~ /i/g) { 
    $position = pos($string); 
    print("matched at position $position\n"); 
}