Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

RE: RE: RE: Win32::MemoryInfo

by tye (Cardinal)
on Aug 31, 2000 at 19:24 UTC ( #30545=note: print w/ replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
        my( $avail, $total )= MemoryStatus( "MB",
            "AvailPageFile", "TotalPageFile" );
    
  2. or download this
        my( $avail, $total )= MemoryStatus( "MB",
            [ "AvailPageFile", "TotalPageFile" ] );
    
  3. or download this
        my $hMem= MemoryStatus( "K" );
        my $load= $hMem->{MemoryLoad};
    
  4. or download this
        perl -de 0
          DB<1> use Win32::MemoryInfo "MemoryStatus"
    ...
            'AvailPageFile' => 3026
            'TotalPageFile' => 32768
    [...]
    
  5. or download this
    my @fieldNames=
        qw( MemoryLoad TotalPhys AvailPhys TotalPageFile
    ...
        my $hFields= {};
        @$hFields{@fieldNames}= @fieldValues;
        return @_ ? @$hFields{@_} : $hFields;
    

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (6)
As of 2014-11-28 05:48 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My preferred Perl binaries come from:














    Results (193 votes), past polls