Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

Re: Why are lines being skipped in output?

by lidden (Curate)
on Mar 18, 2008 at 13:43 UTC ( [id://674784] : note . print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    while (<test>) {    
        $_ =~ <test>;
    ...
        s/(th)/TH/gi;
        print "$_\n";
    }
    
  2. or download this
    while (<test>) {    
        s/th/TH/gi;
        print;
    }