...
main::(overlay.pl:9):     while(readline($data[$i]->{FH})){
  DB<1> n
main::(overlay.pl:10):        1;
  DB<1> n
main::(overlay.pl:9):     while(readline($data[$i]->{FH})){
  DB<1> n
main::(overlay.pl:10):        1;
  DB<1> n
...