while (<>) { # ... your code here ... print $_; }