@pdblines is empty, so you never enter your for loop:

my @pdblines = ();

 while (<IN>) {
 for ( @pdblines) {
[download]

I can't begin to work out what you think should happen here.

BTW: If you indent your code correctly and consistently, more people will be encouraged to consider it.