Select Code to Download

while(my $line = $buffer->sysreadline($fh))
        {
...
        $self->_process($line);
        }
      }

sub run
  {
...
      }
    }
  }