{
nf = 0
while(nf < NF)
        {
        nf++
        if($nf ~ /-si/)
        #le rige nf e if sono ripetibili n volte per n estrazioni
        print $nf
        #print $nf,NR
        #l'alternativa con ,NR servirebbe a stampare anche il numero di riga
        }
}