my $pos4 = CORE::index($test,"test");