资源描述:
《perl常用模块总结》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、(1)Net::FTP(2)Net::Telnet(3)LWP::Simple,get()(4)Expect(5)XML::Simple,XMLin()(6)Data::Dumper,Dumper()(7)IO::Socket(8)Date::Manip,DateCalc(),UnixDate()(9)Date::Manip,Date_Cmp()(10)File::Find,find()(11)ExtUtils::Installed,new(),modules(),version()(12)DBI,connect(),prepare
2、(),execute(),fetchrow_array()(13)Getopt::Std(14)Proc::ProcessTable(15)Shell(16)Time::HiRes,sleep(),time()(17)HTML::LinkExtor,links(),parse_file()(18)Net::Telnet,open(),print(),getline()(19)Compress::Zlib,gzopen(),gzreadline(),gzclose()(20)Net::POP3,login(),list(),get()
3、(21)Term::ANSIColor(22)Date::CalcCalendar(),Today()(23)Term::Cap,Tgetend(),Tgoto,Tputs()(24)HTTPD::Log::Filter(25)Net::LDAP(26)Net::SMTPmail(),to(),data(),datasend(),auth()(27)MIME::Base64,encode_base64(),decode_base64()(28)Net::IMAP::Simple,login(),mailboxes(),select(
4、),get()...(29)Bio::DB::GenBank,Bio::SeqIO(30)Spreadsheet::ParseExcel(31)Text::CSV_XS,parse(),fields(),error_input()(32)Benchmark(33)HTTP::Daemon,accept(),get_request()...(34)Array::Compare,compare(),full_compare()...(35)Algorithm::Diff,diff()(36)List::Util,max(),min(),
5、sum(),maxstr(),minstr()...(37)HTML::Parser(38)Mail::Sender(39)Time::HiRes,gettimeofday(),usleep()(40)Image::Magick(41)Data::SearchReplace(1)Net::FTP#!/usr/bin/perl-w#file:ftp_recent.pl#Figure6.1:DownloadingasinglefilewithNet::FTPuseNet::FTP;useconstantHOST=>'ftp.perl.o
6、rg';useconstantDIR=>'/pub/CPAN';useconstantFILE=>'RECENT';my$ftp=Net::FTP->new(HOST)ordie"Couldn'tconnect:$@";$ftp->login('anonymous')ordie$ftp->message;$ftp->cwd(DIR)ordie$ftp->message;$ftp->get(FILE)ordie$ftp->message;$ftp->quit;warn"Fileretrievedsuccessfully.";(
7、2)Net::Telnet#!/usr/bin/perl-w#file:remoteps.plusestrict;useNet::Telnet;useconstantHOST=>'phage.cshl.org';useconstantUSER=>'lstein';useconstantPASS=>'xyzzy';my$telnet=Net::Telnet->new(HOST);$telnet->login(USER,PASS);my@lines=$telnet->cmd('ps-ef');print@lines;(3)LWP::Si
8、mple,get()#!/usr/bin/perl-wusestrict;useLWP::Simpleqw(get);my$url=shift
9、
10、"http://www.chinaunix.net";my$content=get($u