in reply to What does $/ = "\/\/\n"; mean?
As jeffa mentioned, the separator now will look for this sequence of characters (//\n) as a record separator. During the while loop, instead of reading one line, it will read up to this special separator.#/usr/bin/perl -w use strict; { local $/ = "\/\/\n"; while (<DATA>) { #chomp; print "< $_ > \n"; } } __DATA__ first row second row // another first another second // one more (3.1) one more (3.2) //
You can easily see where each record begins and ends.< first row second row // > < another first another second // > < one more (3.1) one more (3.2) // >
The entire separating sequence will be chopped out, but the inner newlines will stay untouched, because they were not separators. Actually, they are part of the string, so the chomp function does not affect them.< first row second row > < another first another second > < one more (3.1) one more (3.2) >
_ _ _ _ (_|| | |(_|>< _|
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Re: What does $/ = "\/\/\n"; mean?
by blakem (Monsignor) on Jan 12, 2002 at 00:51 UTC | |
by gmax (Abbot) on Jan 16, 2002 at 16:13 UTC |