Hi, I have just started working on PERL and am facing this problem. Is the implementation done like this? i have a text file sample.txt which has 3 lines abc deg hij when i read everything once i get all the details and then am not able 2 read it again. code used is open(file1,"sample.txt"); print(<file1>); $line1=<file>; print($line1); This does not print anything. Can u pls suggest?Have I done some mistake? Thanks KP