I would recommend either (1) don't chomp in the first place or (2) just
do print "$_\n".

-Mike

Barry Brevik wrote:
>  I am aware that there are a number of Perl "operations" that will use
>  the system variable $_ as the default variable if one is not supplied.
>  
>  Consider the following snippet (where XMLIN is a previously opened file
>  handle):
>   
>  
>    foreach (<XMLIN>)
>    {
>      chomp;
>  
>      # Do some stuff to the contents of the line.
>  
>      print;
>    }
>  
>  OK, what I really want to do here is print the (possibly changed) line,
>  AND a CR/LF, but to do that, I have to add a separate print statement
>  like this: print "\n";
>  
>  So after all these years, I'm wondering, is there a PERLish way to add a
>  "\n" in the same line of code that prints the default $_ variable?
>  
>  Barry Brevik
>  _______________________________________________
>  ActivePerl mailing list
>  ActivePerl@[...].com
>  To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
>  

_______________________________________________
ActivePerl mailing list
ActivePerl@[...].com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs