Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re^2: returning a specific value from a command

by pvaldes (Chaplain)
on Oct 28, 2011 at 15:06 UTC ( #934419=note: print w/ replies, xml ) Need Help??


in reply to Re: returning a specific value from a command
in thread returning a specific value from a command

vmstat reports information about processes, memory, paging, block IO, traps, disks and cpu activity.

the output is like this

procs ------memory------- --swap-- ---io--- -system-- ----cpu---- r b swpd free buff cache si so bi bo in cs us sy id wa 0 0 0 9999 9999 9999 0 0 99 99 9999 999 9 9 99 9

Let's see...

Your target is the 13th number in the third line, so you need to discard lines 1 and 2, and then print this element

my @stat = `vmstat`; foreach $line(@stat){ if ($line =~ /^procs/){next} if ($line =~ /us/){next} else {chomp $line; my @fo = split /[[:blank:]]+/, $line; print "Message: CPU user time: $fo[13]\n";} }


Comment on Re^2: returning a specific value from a command
Select or Download Code
Re^3: returning a specific value from a command
by familyofcrowes (Initiate) on Nov 02, 2011 at 17:32 UTC
    This is a HUGE help... Thanks very much!!!

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://934419]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (3)
As of 2014-07-13 03:03 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    When choosing user names for websites, I prefer to use:








    Results (245 votes), past polls