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
> [email protected]
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
>
_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
