while (<>) {
   s/\s+\z//;
   ...
}