use perl to catch memory usage

I need to know my system's current memory usage while I'm running my perl script. How do I use perl to catch my system memory usage?
thanks a lot

请您先登陆,再发跟帖!