Perl中文站-My Script Center

(31) Text::CSV_XS, parse(), fields(), error_input()

如果field里面也包含分隔符(比如”tom,jack,jeff”,”rose mike”,O’neil,”kurt,korn”)，那么我们
解析起来确实有点麻烦， perlcn.net/perl-examples-5#more-178" class="more-link">Continue Reading

(21) Term::ANSIColor 例子

#!/usr/bin/perl
use strict;
use Term::ANSIColor qw(:constants);

$Term::ANSIColor::AUTORESET = 1; perlcn.net/perl-examples-4#more-175" class="more-link">Continue Reading

(11)ExtUtils::Installed, new(), modules(), version()

#查看已经安装的模块的相应信息。

#!/usr/bin/perl
use strict;
use ExtUtils::Installed; perlcn.net/perl-examples-3#more-173" class="more-link">Continue Reading

(1)Net::FTP

#!/usr/bin/perl -w
# file: ftp_recent.pl
# Figure 6.1: Downloading a single file with Net::FTP
use Net::FTP; perlcn.net/perl-examples-2#more-171" class="more-link">Continue Reading