小编See*_*gar的帖子

假设在一个PERL模块中有一个子程序检查 -

sub exam  
{  
    ....  
    ....  
    exit 0;  
}

我想为这个API编写测试用例 -

is('exam',0,"exam subroutine works properly");

但它不起作用,因为之后exit 0,PERL脚本即将发布.
所以我的问题是我们如何模仿退出的行为？

例如,我们有$list1var作为 -

$list1 = "GET, POST, GET, DELETE";

预期产量 -

GET,POST,DELETE