Select Code to Download

     while ( <$input> ) { 
         chomp; 
         my @row = split;
         #stuff
     }

     $_ -> methodcall() for @objects;