prendere riga nriga

[Mich_]

Hai provato a scrivere:
print "@words[$nword]\n";