Mega Code Archive

 
Categories / Perl / Language Basics
 

A simple version of the cat command using $_

#!/usr/local/bin/perl  print while (<>);