PERL (substr)

почему этот код выдает на печать "-1"? ведь подстрока "html" присутствует в данной строке. Почему не 8?

Спасибо.

$stroka = "BANDfos.html";
my $in = index ($_, 0, 'html');
print $in;

А причем здесь Перл?
----------------------------------------
Артисты не приехали, приехали цыгане

perldoc -f index

       index STR,SUBSTR,POSITION
       index STR,SUBSTR
               The index function searches for one string within another, but without the wildcard-like behavior of a
               full regular-expression pattern match.  It returns the position of the first occurrence of SUBSTR in STR
               at or after POSITION.  If POSITION is omitted, starts searching from the beginning of the string.  The
               return value is based at 0 (or whatever you’ve set the $[ variable to--but don’t do that).  If the sub-
               string is not found, returns one less than the base, ordinarily "-1".

my $stroka = 'Bandfos.html';
my $in = index($stroka, 'html');
print "$in\n";