Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Re: Tie: Creating Special Objects

by blueflashlight (Pilgrim)
on Jul 07, 2001 at 07:42 UTC ( #94682=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
    
    ...
    printf("%20s%-20s\n", "load(5):\t",  $uptime->load('five'));
    printf("%20s%-20s\n", "load(15):\t", $uptime->load('fifteen'));
    printf("%20s%-20s\n", "string:\t",   $uptime->as_string);
    
  2. or download this
    ./dumpuptime.pl 
                uptime:     21 days,   8:02     
    ...
               load(5):     0.04                
              load(15):     0.03                
                string:      20:39pm  up 21 days,   8:02,  1 users,  load 
    +average:  0.04, 0.03, 0.04
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://94682]
help
Chatterbox?
[Corion]: Hi marto ;)
[Discipulus]: Corion ah! you opened a new search path! thanks
[choroba]: LanX No, but they grow and want more!
LanX was conditioned by a female
Discipulus my 'kids' always complain with our car..
[LanX]: true, cars are bad in growing
[marto]: WaitWindow()
[Corion]: Discipulus: You need to respond with 0 to WM_QUERYENDSESSION

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (8)
As of 2017-01-17 09:52 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you watch meteor showers?




    Results (154 votes). Check out past polls.