sub get_memory_tot {
        return $WAI->kBToMB($WAI->getMem()->{'MemTotal'} );
}

sub get_memory_free {
        return $WAI->kBToMB( $WAI->getMem()->{'MemFree'} );
}

sub get_swap {
        return $WAI->kBToMB( $WAI->getMem()->{'SwapTotal'});
}