Perl

Perl物件導向編程全文510頁,可參考相關資料,作者:Damian Conway目錄-----------------------------------------------------序前言致謝線上1  你首先需要知道的（物件導向入門）1.1  物件導向本質.1.2  物件導向其它概念.1.3  術語:一些(很多)詞彙.1.4  哪裡能得到更多.1.5  概要.2  你第二要知道的(Perl 進階)2.1  Perl本質.2.2  Perl非本質(很重要的喲!).2.3  CPAN.2.

結 構含 義\n換行\r斷行符號\t水平置表符\f換頁符\b退格\v垂直置表符\a響鈴\eEsc\007任一八進位ASCII值(這裡007表示bell)\x7f任一十六進位ASCII值\cC任一“控制”字元\\反斜線\"雙引號\l下一字母小寫\L以後所有字母小寫直到\E\u下一字母大寫\U以後所有字母大寫直到\E\E結束\L和\U

用perl操作註冊表的一些基本函數著作權聲明：轉載時請以超連結形式標明文章原始出處和作者資訊及本聲明http://n0thing.blogbus.com/logs/237690.html一 Open(): 文法： $object->Open($RegistryObj,$hKey); $object A part of the registry. $RegistryObj The key under the $object you want to explore. $hKey

 我們在linux常常用到一個程式需要加入參數,現在瞭解一下perl中的有關控制參數的函數.getopt.在linux有的參數有二種形式.一種是–help,另一種是-h.也就是-和–的分別.–表示完整參數.-表示簡化參數.在perl中也分這二種.Getopt::Std模組的功能: 初始化perl命令列中所接受的參數，簡化了命令列參數的解析。簡化參數例子：12345678910#!/usr/bin/perl -wuse strict;use Getopt::Std; use vars

原文發表在網易部落格 2010-11-04 21:22:33 3.1 列表列印#從STDIN中讀取每個列表值時,都會經過chomp的處理,因此每個列表元素都被去掉了結尾的分行符號 chomp(@lines=<STDIN>); print "print the list\n"; foreach  $line (@lines){     print "$line\t";     } print "\n"; print "print the

.代表任何一個單字元,不匹配分行符號.*是量詞,表示前面內容出現0到多次.+也是量詞,表示前面內容出現1到多次.字元集簡寫    \d表示一個數字    \w表示一個單詞字元()數字,字母,底線)    \s表示一個空白,可以匹配分行符號,定位字元,換頁符,斷行符號符,空格    \D表示一個非數字相當於[^\d]    \W表示一個非單詞字元相當於[^\w]        \S表示一個非空白字元相當於[^\s]    perlRegex的修飾符    /i表示大小寫無關，例如/yes/i

Expect.pm 模組：主要用來和另外一個server進行互動的，比如ftp，telnet等等。在寫一些監控腳步上，也會經常用到。我所用到的方法很簡單，spawn($command,@params),Forks and execs $command. Returns an Expect object upon success or undef if the fork was unsuccessful or the command could not be found. spawn()

例子：假設在fred and barney went bowling last night 上使用/fred.+barney/進行匹配。我們知道Regex將匹配上，下面我們具體的講解這一個過程：首先，子模式fred 將匹配其對應的字串。模式的下一部分是.+，它將匹配除了分行符號之外的任一字元，次數大於等於一。但，由於加號(+)是貪婪的；它將儘可能的進行匹配。因此，它將匹配剩餘的所有字串，包括night。現在對banrey

通常，Regex是針對單行文本的。由於Perl 可以處理任意長度的字串，因此，Perl 的模式可以輕易的對多行文本進行匹配，就像單行文本一樣。當然，運算式中應當包含多行文本。下面的字串中有4 行：$_ =“I’am much better\nthan Barney is\nat bowling,\nWilma,\n”;錨定^和$是指整個字串的開頭和結束，加強了理解，^和$指的是字串的首和尾，並不是針對單行的。但/m

Regex的三種形式  Regex中的常用模式  Regex的 8 大原則    Regex是 Perl 語言的一大特色，也是 Perl 程式中的一點痛點，不過如果大家能夠很好的掌握他，就可以輕易地用Regex來完成字串處理的任務，當然在 CGI 程式設計中就更能得心應手了。下面我們列出一些Regex書寫時的一些基本文法規則。 1) Regex的三種形式 首先我們應該知道 Perl 程式中，Regex有三種存在形式，他們分別是： 匹配：m/<regexp&

     你是否覺得Perl中關於模組的文檔有些難懂？好的，這裡有一個世界上最簡單的模組，它將用於展示(demonstrate)Exporter模組所有的特性，另外還有一段使用這個模組的指令碼。同時，我們也會給出一個有關於@INC的簡短說明，最後，還要講一下有些關於using warnings和use模組的使用。     下面是這個模組的內容： MyModule.pmpackage MyModule;use strict;use Exporter;use vars qw($VERSION

$指一個 ，@指一堆，%指hash---------------------------------------------------x 字串重複操作符.Eg: "fred" x 3 = "fredfredfred"------------------------------------------------------數組：$#數組名 最後一個元素的索引值$資料名[-1] 最後一個元素pop和push在最後段操作,shift和unshift在最左端操作reverse 反轉列表元素sort

指令碼這個東東還是非常實用的，可以簡化手動操作。下面這個指令碼是刪除前七天的記錄檔。bat指令碼：@echo offecho ------------Delete log file,develop by terry-------------echo Today date:：%date%::Yearset yy=%date:~0,4%::Monthset mms=%date:~5,2%if %mms% GTR 10 (set mm=%mms%) else (set mm=%mms:~1,2%)::

常見資料類型的引用定義：資料類型           定義      舉例標量變數           \$Var                              $Pointer  =  \$Var數組                 \@Array                          $Pointer  =  \@Array雜湊變數           \%Hash                           $Pointer  = 

代碼： use strict; use warnings;my $test = "asdf";print "${test}_test2\n";#constantuse constant {    AAA => "aaa",    BBB=> "bbb",    MIN_TOTAL => 12,    SCORE_PASS => 90,    SCORE_RED => 70,};print AAA;print SCORE_PASS;#two dimesion arra

參考： http://docstore.mik.ua/orelly/linux/cgi/ch15_03.htm  http://stackoverflow.com/questions/2224158/how-can-i-send-post-and-get-data-to-a-perl-cgi-script-via-the-command-line http://search.cpan.org/~lds/CGI.pm-3.20/CGI.pm#DEBUGGING  一

文章目錄   參考：http://www.willmaster.com/library/manage-forms/using_perl_to_submit_a_form.php http://www.oschina.net/code/snippet_12_854  有時需要在perl中非互動地調用已有的cgi來完成一定的功能，此時需要類比一個http請求來調用cgi。 get方式調用：   

補充一下昨天總結的查詢本地已經安裝了哪些 Perl 模組的方法，還有兩種方法可以用：在 shell 裡運行下面的語句：$ perl -mSmart::Comments -el 如果提示了類似下面的錯誤， Can’t locate Smart/Comments.pm in @INC (@INC contains: c:/strawberry/perl/lib c:/strawberry/perl/site/lib .).則表明你的 Perl

我有一個叫a.pl的Perl指令碼，裡面有類似下面的讀取命令列輸入值的語句：my $device_name = <STDIN>;如果我在b.pl指令碼裡，用system或是readpipe命令來粘合指令碼a.pl，當運行到上面這個語句的時候，命令列會提示輸入一個值。有的時候，比如說自動化指令碼測試中，希望能讓指令碼b.pl自動輸入這個值，或者說，自動在b.pl指令碼裡給a.pl指令碼裡的變數$device_name賦值。這樣，程式就可以不用人工幹預，全部自動運行了。可以在b.pl中，

1、perldoc perllocal 2、推薦pmtools裡的pminst命令    http://search.cpan.org/src/MLFISHER/pmtools-1.01/pminst 3、編寫如下標本#!/usr/bin/perluse strict;use ExtUtils::Installed;my $inst= ExtUtils::Installed->new();my @modules = $inst->modules();foreach(@modules)