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

##</code><code>##

     $_ -> methodcall() for @objects;