in reply to Re^2: raw data formatting
in thread raw data formatting
Your version of Perl doesn't support the non-destructive substitution modifier (/r). Use the following:
print for map { s/\s+/$letter++ . ' '/e; $_ } @lines;
Will make that change in the original posting.
In Section
Seekers of Perl Wisdom