Perl
文章平均质量分 78
Stainky
我有一个梦想... ...
展开
-
Perl拾遗
1.$| = 1; $|缓冲输出控制标记,若设置为0,表示当前输入不经过缓存直接输出。原创 2013-12-04 06:41:32 · 541 阅读 · 0 评论 -
Perl抓取网页信息
demo: #!/usr/bin/perl -w # Perl pragma to restrict unsafe constructs use strict; # use LWP::UserAgent model use LWP::UserAgent; # main function sub main { # get params # @_ # Within a原创 2013-12-13 13:47:56 · 1779 阅读 · 0 评论 -
Perl读取文本格式化后写入文本
demo: #!/usr/bin/perl -w #Perl pragma to restrict unsafe constructs use strict; use utf8; #main function sub main { #get params # @_ # Within a subroutine the array @_ contains the par原创 2013-12-13 13:43:41 · 990 阅读 · 0 评论 -
Perl读写数据库数据
demo: #!/usr/bin/perl -w # Perl pragma to restrict unsafe constructs use strict; # use DBI model use DBI; # debug var results; use Data::Dumper; #validate entry sub validate { my ($v1,$v2) = @_; my原创 2013-12-13 13:49:15 · 1273 阅读 · 0 评论