Help for this page

Select Code to Download


  1. or download this
      DB<111> $str1 = "000001";$str1 =~ m/[^0]/g; print pos($str1)
6