thanks guyz for ur replies... i got what i wanted to do.. here is the sample code:

while($line=<FH>)
{
                print "$line \n";
                while(<FH>)
                {
                        print "Next line is $_ \n";
                }
}
[download]

Using $_ worked for me in my application. I replaced variable $nextline with $_, so that the inner "while" works with $_ until the condition and $line will continue from where $_ left ( i.e. file handler). Thanks once again guyz. take care and have fun