$\ = $/; # ORS = IRS = "\n"
$, = ":"; # OFS = ","
while (<PASSWD>) {
chomp; # removes $/ from $_
my @f = split $,; # splits $_ on occurrences of $,
# fool around with @f
print MOD @f;
}
Why would it put a newline to the end of each line during the print? You say that "$\ goes where you put a \n in your print()" but you're chomp()ing the newlines.
What do I miss here?
Hmm, now looking at it I get even more questionmarks on my forehead:
- What's the point of assigning a colon to $, when split doesn't use it by default?
- Why do you have to assign $\ with $/? Aren't they supposed to have the same value anyway?
- Why don't we have an abbrev like <c> for the code-Tag, since it is really much to type *grin*?
Still, as I said above: good read!
Regards... |
Stefan
|
you begin bashing the string with a +42 regexp of confusion
|
ps: a typo in your article:
$ARGV this holds the input source currently begin read from
should probably be "being read from", er?
|