http://www.perlmonks.org?node_id=962665


in reply to Arrays merges and redundancies

I'm a little confused by your explanation, but I think you're using arrays when you probably want hashes? Maybe something like...

my %hash = (
    1 => [qw/a a a a a a a a/],
    2 => [qw/b b b b b b b b/],
    3 => [qw/c d c c c d c d/],
);

[download]

But I'm still not very clear on what you're trying to do...

Replies are listed 'Best First'.
Re^2: Arrays merges and redundancies
by Anonymous Monk on Mar 30, 2012 at 19:51 UTC

    From the following studpi example;

    @IDs = qw(Apple Apple Grape Banana Banana)
@Price = qw(5 5 2 3 4 )
@Amount = qw(10 15 3 4 4 )

I want;

@IDs = qw(Apple Grape Banana)
@Price = qw(5 2 3/4)
@Amount = qw(10/15 3 4)

    [download]

    Ithought about using hashes but for that I need unique key and IDs are not unique. Sorry for vague explanations and thanks for help.

[reply]
[d/l]

In Section Seekers of Perl Wisdom