Perl 语言体验

 

因为测试ACE_TAO的关系安装了activePerl，这才感受到了脚本语言的强大力量（网页里的脚本被限制了），Perl在Linux世界里算是标准装备了，但是在Windows环境也是相当有用，说回来我已经被DOS命令行的简陋搞的很头疼了，很多批处理的应用或者简单网络应用使用C++,C#简直就是极端低效率的事情，要打开IDE，设置Project，编码，部署，--,---

而Perl只用新建一个文本文件，写吧写吧，后缀名一改，运行就是了，小型的客户端应用，都可以处理了，作为测试应用的语言更是方便不过，而且文档在cspan也相当丰富。

这里我不尽想比较一下同为解释语言perl 和 Java，.net。语言设计为有其特定的应用领域。如果是2，3百行以内的简单应用perl是首选，可是开发庞大的应用架构，就绝对别想。Java，（其实是不是java还另说，j2EE语言跟java差的很远了，一般PC机也根本跑不了）.Net作为现代解释型语言与以前的解释型语言最大的不同应该是对资源的全程监管的概念，这个就是传说中的设计模式的应用吧......

perl代码，FlashGet，迅雷等下东西虽然快，但是批下载只能有一变量(*)，不爽，用perl来写脚本，能组合各总种方式：

$infilename = 'http://file.xingkong.com/Audios/2006/3/2006361810512108.mp3';
$outfilename= 'ayaya.mp3';
use LWP::UserAgent;
  $ua = LWP::UserAgent->new;
  my $req = HTTP::Request->new(GET => $infilename);
  $res = $ua->request($req, $outfilename);
  if ($res->is_success) {
     print "ok/n";
  }
  else {
     print $res->status_line, "/n";
  }