while (<>) { process $_ }