Open打开系统命令perl-tianting002-ChinaUnix博客

Chinaunix首页 | 论坛 | 博客

Right Here Waiting

首页　| 　博文目录　| 　关于我

博客访问： 1149462
博文数量： 312
博客积分： 12522
博客等级：上将
技术积分： 3376
用户组：普通用户
注册时间： 2008-02-27 18:35

文章分类

全部博文（312）

Andorid（3）
Python（5）
Git（36）
Mantis（2）
Windows（0）
Shell（9）
Ant（2）
Hudson（7）
SVN（23）
生活（0）
体育（0）

NBA火箭（0）
Perl（78）
Linux（27）
SCM（94）
Oracle（25）

Oracle笔记（7）

英语学习（2）
未分配的博文（1）

文章存档

2016年（3）

2015年（1）

2013年（1）

2012年（28）

2011年（101）

2010年（72）

2009年（13）

2008年（93）

我的朋友

最近访客

推荐博文

Open打开系统命令perl

分类： IT业界

2011-07-20 21:50:48

#!/usr/bin/perl -w
open(F1,"dir /B|sort|");
@a=readline F1;
foreach (@a) {
print "$_";
}
close F1;

阅读(835) | 评论(1) | 转发(0) |

0

上一篇：模块　笔记

下一篇：Perl-substr 用来存取子串

给主人留下些什么吧！~~

cinanine2011-07-24 15:10:58

非常自然

回复 | 举报

关于我们 | 关于IT168 | 联系方式 | 广告合作 | 法律声明 | 免费注册

Copyright 2001-2010 ChinaUnix.net All Rights Reserved 北京皓辰网域网络信息技术有限公司. 版权所有

感谢所有关心和支持过ChinaUnix的朋友们