[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
523066680

Rank: 7Rank: 7Rank: 7

帖子
3151 
积分
6455 
技术
317  
捐助
70  
注册时间
2008-8-3 
1楼 跳转到 »
发表于 2011-6-17 18:30 | 显示全部帖子
本帖最后由 523066680 于 2011-6-17 18:42 编辑

=。=  此时无聊胜有聊
win32 perl5.1

foreach $i (1..50) {
        print "\r"."="x$i .">" ;
        system("ping -n 1 127.0.0.1>nul");
}
<STDIN>;
FuniCode 编程论坛

TOP

返回列表