perl -d 的调试是否功能不多？

perl -d 的调试的时候觉得它不是很好用
比如在一个循环的时候
i 从0  到 100
我想在i 在50的时候停下来，除了在源代码中加入if(i==50)然后设断点的方法，
perl -d 有没有其他直接的方法。
谢谢！

简单: ###是注释

v ### 找到要下断点的行号, 假设是第10行
b 10 $i == 50  ### 设置断点: 当$i==50, 就break停在line 10
c  ### 然后用continue, 执行, 直到第一个断点触发

看perldoc perldebug