Perl

標籤：blog   os   使用   ar   檔案   div   sp   log   c   如何跳過檔案首行讀取檔案呢？我們可以使用readline來實現，開啟檔案後，首先readline，然後再使用while繼續讀取檔

標籤：style   blog   http   color   使用   ar   for   檔案   div   系統：Windows語言：Perl工具：Notepad++/cmd目前要用PERL來分析一下頁面。然後組群下載

線程概述線程是一個單一的執行流程，它是所有程式執行過程中最小的控制單位，即能被

Regex（Regular Expression，縮寫為regexp，regex或regxp)，又稱正規運算式、正規表示式或常規運算式或正規化標記法或正規標記法，是指一個用 來描述或者匹配一系列符合某個句法規則的字串的單個字串。在很多文字編輯器或其他工具裡，Regex通常被用來檢索和/或替換那些符合某個模式的文本 內容。許多程式設計語言都支援利用Regex進行字串操作。例如，在Perl中就內建了一個功能強大的在Regex引擎。Regex這個概念最初是由

perl中建立數組時，可以使用到qw。但有一個問題，如果要建立有20個人名組成的數組，並且每個人的名字是這種形式的"Join smith" "Harry Potter"也就是每一個名字既包含姓也包含名。此時，qw就不起作用了。因為qw是用空格作為分隔字元。下面提供一些替代的解決方案，供大家參考。方案一：用最原始的方案，也就是雙引號，來進行數組的建立複製代碼 代碼如下:@names=("Join smith","Harry Potter"); print @names[0]; 結果如下：F:\&

複製代碼 代碼如下:#!/usr/bin/perlmy %scyjm; open (CONTACT,"f:\\perl\\f.txt")||die("can not open the file!"); while (<CONTACT>) { next if /^#/;#if($_=~/^#/的簡寫 chomp; my @information =split;# my @information=split/\s+/,$_;的簡寫 next

這裡為大家舉二個小例子，供朋友們學習參考。對任何的函數記錄函數啟動並執行時間。複製代碼 代碼如下:#!/usr/bin/perluse warnings;use strict;no strict "refs";sub testLogToStd{print "Test stdout : \n";open LOG,"> 2.txt";select LOG;print "just a test\n";#recover STDOUTselect STDOUT;print "just a test2

基本用法#初始化%h為空白數組 %h={};#用數組初始化%h為a=>1,b=>2 %h=('a',1,'b',2);#意義同上，只是另一種更形象化的寫法。%h=('a'=>1,'b'=>2);#如果key是字串，可以省略引號。下面這行和上面那行是一樣的%h=(a=>1,b=>2);#用{}來訪問print “$h{a}\n”;#列印 $h{b}='2b'; print “$h{b}\n”; #列印2b#刪除key用delete delete$h{b};

1. 用grep函數 函數名 grep 調用文法 @foundlist = grep (pattern, @searchlist); 解說 與同名的UNIX尋找工具類似，grep函數在列表中抽取與指定模式比對的元素，參數pattern為欲尋找的模式，傳回值是匹配元素的列表。 例子 @list = ("This", "is", "a", "test"); @foundlist = grep(/^[tT]/, @list); 結果 @foundlist = ("This", "test"); 2.

perl有最好的文本資料處理能力.這是大家都知道的.在perl本身有一個別的軟體沒有的小功能,就是Perl格式.它相當於簡單的命令列報表和圖表輸出.這個需要先聲明格式.建立格式的檔案控制代碼.然後由@,^,<,>,|這樣的字元構成所謂的”報表”來輸出圖表.這樣可以指定出行的外觀.後面接資料項目,最後用write來顯示格式化的內容.範例:輸出紀錄格式輸出象下邊一樣定義：format NAME =FORMLIST.第一部分,聲明.如上.如果省略 NAME，上面的代碼將定義格式輸出

PERL裡Regex的簡介 一、簡介 二、匹配操作符 三、模式中的特殊字元 1、字元+ 2、字元 []和[^] 3、字元 *和? 4、逸出字元 5、匹配任意字母或數字 6、錨模式 7、模式中的變數替換 8、字元範圍轉義首碼 9、匹配任一字元 10、匹配指定數目的字元 11、指定選項 12、模式的部分重用 13、轉義和特定字元的執行次序 14、指定模式定界符 15、模式次序變數 四、模式比對選項 1、匹配所有可能的模式(g選項) 2、忽略大小寫(i選項)例 3、將字串看作多行(m選項)

   在此過程中遇到幾個問題：一， 首先遇到perl 指令碼直接在命令列中執行，一切正常，可以從版本管理軟體中checkin ,checkout,也可以進行源碼自動編譯，也可以把執行檔案通過InstallShield 進行打包，再產生ISO，再上傳至Release的FTP正確的位置，也可以自動群發 Release Notes

一、進程處理函數1、進程啟動函數函數名 eval 調用文法 eval(string) 解說 將string看作Perl語句執行。正確執行後，系統變數$@為空白串，如果有錯誤，$@中為錯誤資訊。 例子 $print = "print (\"hello,world\\n\");";eval ($print); 結果輸出 hello, world 函數名 system 調用文法 system(list) 解說

工作需要用perl寫了一個指令碼讀取1G多的檔案，直接報out of memory，對perl不是很熟悉就上網查了資料，後來發現是因為寫的讀取檔案內容時直接將所有檔案內容讀入數組導致這個問題。Code highlighting produced by Actipro CodeHighlighter

　　1.Perl數組(1):　　　　1) 初始化數組 @array = ( "stringA" , "stringB" , "stringC" );　　　　2) 使用負索引迴圈檢索　print $array[-1];  #輸出索引為(-1 + 3) % 3 = 2 的 stringC　　　　3) 動態增長 $array[4] = "stringD"; #雖然$array[3]還沒有使用，但在動態賦值$array[4]的使用，已經對$array[3]賦空置　　　　4) 動態增長後的負索引

Perl 常用函數指令：print文法：print Filehandle LIST說明：這個Filehandle可以看作在I(INPUT)/O(OUTPUT)之間的一個橋樑,可以利用FILEHANDLE來做出資料讀入寫 出的動作.STDIN是代表從哪連輸入資料,例如從電腦的鍵盤輸入;STDOUT是代表從哪連輸出資料;例如從電腦的屏 幕輸出;STDERR是代表從哪連輸出錯誤的資料,例如從電腦的螢幕輸出.而在PERL語言中有三個標準FILEHANDLE：

最近一直的為一些技術和語言搞過去搞過來,沒得時間來更新這個地方..非常的慚愧..前段時間,花了很長的時間來學習.net3.0,3.5等相關的一些東西,包括linq,lamabda等等...在看這些東西的時候,和開發組組長激烈的吵了一架,總算把公司從2005推到了2008開發上.(06年進公司的時候,還在用2003).同時，由於自己個人在私下的時間內,在為公司做一個培訓的內部網站(還在使用05的模板頁),說實話,自己感覺,對一些技術等嚴重的落後..沒辦法,分公司不象北京,上海,廣州

最近因為項目需要，需要在多個古老的linux/unix版本上完成一個工具，有些沒有python所在，不得不重拾perl文檔……再讀perl文檔的，是一個讓人吐血的過程。習慣了python> 2.4 的文法和core庫組織，那種相對來說比較合理的安排和統一的格式，perl的就顯得非常的不合理。我想這應該是因為它所出現的那個石器時代造成了這些個時代斷層，最初的優雅和驚豔經過前僕後繼維護者的縫縫補補，變成了現在這個百變妖精的德行……1，perl的關鍵字文法多變和詭異，比如 unless 迴圈；2

copy from http://www.lwolf.cn/blog/article/program/perl-ini.html之前有寫過用C#解析INI檔案的文章，那時是因為要用Perl來解析INI，後來就在網上找了個現成的解析代碼IniParser.       假設INI檔案是這樣的：[Directories]Input=c:\autoexec.bat      使用方法如下：use IniParser;my $ini = IniParser->new("c:\\test.ini")

Perl 最初的設計者為拉裡·沃爾Larry Wall），他於1987年12月18日發表。Perl借取了C、sed、awk、shell scripting以及很多其他程式語言的特性。其中最重要的特性是它內部整合了Regex的功能，以及巨大的第三方程式碼程式庫CPAN。很多招聘要求熟練使用Perl Python ruby中的一種，可見Perl的重要性：650) this.width=650;" alt="xx(1) 學習Perl 第一講"