Re^2: convert rows to columns

I assume in the second line of your "while" loop that you meant @pairs =~ /(..)/g; right?

ack Albuquerque, NM

Comment on Re^2: convert rows to columns Download Code

Replies are listed 'Best First'.
Re^3: convert rows to columns by Athanasius (Archbishop) on Nov 27, 2012 at 01:43 UTC
No, I did mean `=`, for assignment. On each iteration of the `while` loop, the default variable `$_` is implicitly assigned the next line read from the `DATA` handle. This `$_` variable becomes the implicit argument to `chomp`, and then it’s implicitly bound to the regex match. So, the code I gave is equivalent to this: `while ($_ = <DATA>) { chomp $_; my @pairs = $_ =~ /(..)/g; ...` [download] but more compact and “Perlish”. See perlvar#General-Variables. Hope that helps, Athanasius <°(((>< contra mundum	[reply] [d/l]

Replies are listed 'Best First'.

Re^3: convert rows to columns
by Athanasius (Archbishop) on Nov 27, 2012 at 01:43 UTC

No, I did mean =, for assignment.

On each iteration of the while loop, the default variable $_ is implicitly assigned the next line read from the DATA handle. This $_ variable becomes the implicit argument to chomp, and then it’s implicitly bound to the regex match.

So, the code I gave is equivalent to this:

while ($_ = <DATA>)
{
    chomp $_;
    my @pairs = $_ =~ /(..)/g;
    ...
[download]

but more compact and “Perlish”. See perlvar#General-Variables.

Hope that helps,

Athanasius <°(((>< contra mundum

[reply]
[d/l]