$!=get.words;map {for $!.kv -> \a,\b {b eq$_&&say a+1}},lines