my $i = index reverse($phrase),$what;