Mega Code Archive

 

Categories / Perl / Language Basics

 

Using diamond sign to read from keyboard

#!/usr/bin/perl -w use strict; while (<>) {     print "text read: $_" }