Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses

Re: Get same position value in 2nd array

by jethro (Monsignor)
on Dec 18, 2012 at 18:52 UTC ( #1009444=note: print w/replies, xml ) Need Help??

in reply to Get same position value in 2nd array

From your sentence that starts with "Basically" I would conclude that you have 3 values per item, a scalar aka number(A), a string(B) and another value(C). I would guess A has duplicate values (0 for example)? Does B have duplicate values? Does the combination of A and B have duplicate values?

What is the operation that you have to do the most? Checking for values greater than zero? Or searching for C given A and/or B ?

These questions are all important. For example if B has no duplicate values and you most often have to search for C given B you might just use B as key and a subhash or subarray with A and C as data:

$h{$B}= {'number'=>$A,'value'=>$C}; print $h{$B}{value}; if ($h{$B}{number}>0) { ...

Or if checking for values greater than zero is your main activity and most of the scalars(A) are zero then it might even be sensible to split the data into two arrays (or hashes), one for all data with A==0 and another for the data with A>0.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1009444]
[Lady_Aleena]: What?! Can't stat ~/Music: No such file or directory? The ~/ doesn't expand?
[Lady_Aleena]: And the env variable $HOME doesn't work either. !@#$
[shmem]: no, that's a shell feature. Use $ENV{HOME}
[marioroy]: my $ans = qx{ find \$HOME -name "*.pl" -exec ls -l {} \\; };
[marioroy]: must backslash $ inside qx
[Lady_Aleena]: I haven't written perl for a while, I've been trying to do things at the command line. I'm having to relearn a lot.
[marioroy]: LA can you post the qx find again
[Lady_Aleena]: Things I would have written a script for while I was on Windows, I can run simply on the command line.
[Lady_Aleena]: marioroy, my @music_times = qx(find ~/Music/Albums/ -type f -iname '*.mp3' -exec mp3info -p "%S\n" {} \;); #unfixed

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (13)
As of 2017-04-23 21:05 GMT
Find Nodes?
    Voting Booth?
    I'm a fool:

    Results (432 votes). Check out past polls.