Mi trovo in output questa riga:
Value of <HANDLE> construct can be "0"; test with defined() at .autp line
65535
il programma e`
if (open (ORI,"iu"))
{
while ( $ai=<ORI> )
{
chop $ai;
print $ai;
}
} else
{ print "non trovo iu\n" ; die ; }
IL BELLO E` che il programma funziona, ma mi stampa in testa quel warning
... come lo levo ?