Re^3: Transposer


Keep It Simple, Stupid
	PerlMonks

Re^3: Transposer

by jdporter (Paladin)

on Jul 14, 2005 at 14:31 UTC ( [id://474889]=note: print w/replies, xml )

Need Help??

in reply to Re^2: Transposer
in thread Transposer

Yeah... but as already discussed, the part that converts those strings into actual arrays should probably be separated from the other part. But hey - if they must be integral, then here:

# first arg: n
# second arg: array(ref) of strings which are comma-separated lists.
# return: list of nth elements.
sub nth_elemS
{
    map { (split ',')[$_[0]] } @{$_[1]}
}
[download]