Help for this page

Select Code to Download


  1. or download this
    $needle = "a";
$haystack =~ /\Q$needle\E/i;
$index = $-[0];
  2. or download this
    $needle = "a";
$haystack =~ /\Q$needle\E/i;
$index = pos($haystack)-length($needle);
  3. or download this
    $needle = "a";
$haystack =~ /\Q$needle\E/i;
$index = length($`);