Re: Vertical split (ala cut -d:) of a file

If you'd rather use only standard tools, unpack may be a better option than split.


my (@col1, @col2, @col3);
my $i=0;
while (<FOO>) {
    ($col1[$i],$col2[$i],$col3[$i])=unpack("A1 A4 A8",$_);
    $i++;
}
[download]

You may also dynamically manage the number of columns by putting all of the arrays in a hash.

Comment on Re: Vertical split (ala cut -d:) of a file Download Code

Replies are listed 'Best First'.
Re^2: Vertical split (ala cut -d:) of a file by Aristotle (Chancellor) on Jan 30, 2005 at 22:23 UTC
You forget to mention that this will only work for files with fixed-width fields. Should that actually be the case, though, then indeed unpack is the fastest option. Makeshifts last the longest.	[reply]