其实没什么，就是原以为自己是传引用进去了，但是实际是传值。在函数里当引用使用，正好是使用模式匹配。晕到。程序一跑起来就是几百M的泄露啊。真汗啊！ leak_mark("string"); sub leak_mark(){     my $str = shift;     $$str =~/test/; } -------------------------------- leak_mark(\"string"); #传引用就ok了。 sub leak_mark(){     my $str = shift;