命令行下Perl怎么清屏

命令行下Perl如何清屏?
在MS-DOS下,我想在屏幕第1行显示一个不断变化的值,请问我该如何做?

------解决方案--------------------
for ($i=1; $i <1000; $i++) {
system "cls ";
print $i;
}