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'});
}