while ( $in = ) { chomp $in