perl 嵌入汇编代码

如何 实现在perl程序中 嵌入汇编代码?
请高手指教