Select Code to Download

use Win32::SystemInfo;
my %mHash = (TotalPhys => 0, AvailPhys => 0);
...
{
    print $mHash{TotalPhys};
}

require Win32::SystemInfo;
my %mHash = (TotalPhys => 0, AvailPhys => 0);
...
{
    print $mHash{TotalPhys};
}