Help for this page

Select Code to Download


  1. or download this
    if ((my $index = index $string, $key) >= 0) {
    ...
}
  2. or download this
    use Devel::Peek qw( Dump );
Dump(index('abcdef', 'abc'));  # IOK ==> number
Dump(index('abcdef', 'xyz'));  # IOK ==> number