Sublime Text2怎么直接测试Perl代码

/*在ST2中执行*/
{
    "cmd": "perl $file",
    "selector": "source.perl"
}

/*
在cmd窗口中执行；
'/c'表示执行完毕后关闭窗口，与'/k'对应；
两个'PAUSE'保证无论文件是否成功运行都能得到反馈信息
*/
{
    "cmd": ["start", "cmd", "/c", "perl $file && PAUSE || PAUSE"],
    "selector": "source.perl",
    "shell": true
}