if ($x =~ m/$y/) {
    print $-[0]; # position des treffers
}