open (TEMPO, "+>c:\\winnt\\temp\\hash.tmp");
print (TEMPO "aba uba\niba seba\njak yuk\n");
close (TEMPO);

open  (TEMPO, "<c:\\winnt\\temp\\hash.tmp");  
while (<TEMPO>)                                
{
 print;
}
close (TEMPO);