while () { $logline=$_; print ("The whole line is ---> ",$logline); }