Re^2: Combining Duplicate entries in an Array


Welcome to the Monastery
	PerlMonks

Re^2: Combining Duplicate entries in an Array

by mmartin (Monk)

on Feb 22, 2012 at 20:18 UTC ( [id://955611]=note: print w/replies, xml )

Need Help??

in reply to Re: Combining Duplicate entries in an Array
in thread Combining Duplicate entries in an Array

Ok, so I modified you example a little bit. Didn't change anything except the way it's structured. The way you did it makes sense but is a little hard for me to read, and possibly maintain later if I ever have to change something.

Here is what I modified to:

for (my $x = $#temp; $x >= 0; $x--)
{
    if ( substr($temp[$x-1][0], 0, -1) eq substr($temp[$x][0], 0, -1))
    {
        $temp[$x-1][1] += $temp[$x][1];
        splice @temp, $x, 1;
    }
}
[download]

Does the same thing just a little more long winded and simpler for a noob..

Thanks Again for Your Help,
Matt