open(PID, "/proc/$$/statm");
return (split(' ', <PID>))[5] * 4;