Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number

Re: process table

by roboticus (Chancellor)
on Dec 20, 2013 at 19:48 UTC ( #1067985=note: print w/replies, xml ) Need Help??

in reply to process table


Because you have two CPUs, and a hash holds one item. So the last one read wins for each CPU. Try this to get a hash of arrays (HoA):

push @{$prochash{$cpu}}, { 'pid' => $pid, 'time' => $time, 'user' => $user, 'args' => $args, };

Or if you want a hash of hashes (HoH), use the first level for the CPU and the second for the PID:

$prochash{$cpu}{$pid} = { 'pid' => $pid, 'time' => $time, 'user' => $user, 'args' => $args, };

There are other ways to do it, too. You may want to review perldoc perldsc

Update: Changed language a little to clarify.


When your only tool is a hammer, all problems look like your thumb.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1067985]
[marto]: good morning all
[prospect]: Good morning ! More Perl learning today, Man that subroutines chapter is tough.
[marto]: tutorials-> Subroutines may be of interest

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (6)
As of 2017-07-24 07:57 GMT
Find Nodes?
    Voting Booth?
    I came, I saw, I ...

    Results (348 votes). Check out past polls.