[求助]如何在perl程序使用unix下awk命令

[求助]如何在perl程序使用unix下awk命令
如何在perl程序中使用unix下awk命令,并且捕获其输出??