Perl

1.安裝perl-ldap   ：http://search.cpan.org/~gbarr/perl-ldap/  前提是已經安裝perl工具包。首先查看perl版本   [root@local~]perl -V   Built under linux   Compiled at Nov  8 2007 06:49:06   @INC:     /usr/lib64/perl5/site_perl/5.8.8/x86_64-linux-thread-multi    

最近2天用perl編程，寫控製程序、做cgi。發現這真是一個好東西啊。代碼非常簡練，而且不容易出錯。我作為一個新手寫了一天，居然沒有出過幾次錯。最終封裝了幾個做cgi的類，一個處理傳入參數，一個處理模版替換，一個處理資料庫連接。然後實戰了一把，寫一個普通的查詢頁面只需5分鐘。呵呵。類庫的實現參照了DotNet的設計。最值得一提的是模版替換那個類，現在可以做到程式邏輯和頁面分離了，只要往他裡面傳資料結構（主要是雜湊表）就可以實現自動替換，是不是有點像DotNet裡面的資料繫結呢？呵呵。以後還可以繼

 指令:# 說明:註解符號Remark宣告 範例:#本程式是一個示範註解說明 -------------------------------------------------------------------------指令:print 文法一:print Filehandle LIST

PERL串連ACCESS資料庫 前題是必須安裝好activeperl （505以上），以及MS Access 97 一. 安裝Win32-ODBC模組 步驟1： 從TOOLS欄目中下載Win32-ODBC.zip,下載完後用winzip解開到一個temp目錄,共有三個檔案： Readme Win32-ODBC.ppd Win32-ODBC.tar.gz 步驟2： 在DOS視窗下，temp目錄中運行下面的DOS命令： ppm install Win32-ODBC.ppd 二.

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

 近日在CSDN的CGI版看到有centuries (燃燒太陽)網友問如何在Perl中內嵌HTML，這是在Perl WEB開發中經常遇到的一個問題，現在寫出來，希望對大家有所協助。問我現在有一個html的網頁代碼，要將其改為perl程式，如果只是單純在其第一行加上"#!../perl/bin/perl",並將檔案尾碼名改為.cgi，會出現錯誤提示"You don't have permission to access /test/index.cgi on this

終於可以拿到這本大作了。正是由於翻過第二版，因此毫不猶豫的上網購買了這本小駱駝書。不過剛拿到的時候一直懷疑是不是定錯書了，因為第二版第一章寫的非常漂亮，把一個簡單的例子漸漸擴大，最後到一個1，2百行的程式。非常引入入勝，這次想重溫卻沒有機會了。第一章作者完全是在講一些perl的相關知識。只在最後列出了一個5行的小例子。雖然感覺驟然下降，不過對perl的熱情不減，還是需要從頭好好看看書來學，而不想每次寫教本都亂翻書，結果雖然可以完成任務不過總是記不住。現在下定決心了從頭來過。希望能把這本書啃完！廢

 第二章 標量資料Perl中的標量表示的範圍很大，包括數字和字元/字串。而且數字也不像c中有浮點數，單精，雙精，整數...之分，只要是數字就是標量。而且所有的數字其內部格式都一樣，perl將整數儲存為浮點數，計算也是按照浮點數進行計算。 數位表示方法：（在這方面還是可以看出perl的隨意性）1.25255.0007.25e45-6.5e24-12e-24-1.2E-230-406129804028376861_298_040_283_768

 用 Sysopen()進行更多的控制 -------------------------------------------------------------------------------- 為了更好的控制檔案的開啟檔案，可以使用 sysopen() 函數： use Fcntl; sysopen(FH, $filename, O_RDWR|O_CREAT, 0666) or die "Can't open $filename for reading/writing/creating :

轉至非安全 pythonhttp://www.nohack.cn/bbs/dispbbs.asp?boardID=13ID=551page=1用nc連，使用了簡易的管道命令（``）使之能執行基本的系統命令，有興趣的朋友可以添加、修改一下，做出更多東西，誰有空建議用win32模組給他系統化一下，再用perlsvc做個服務啥的 #!/usr/bin/perluse I:Socket;  $port = $ARGV[0];my $socket = new I:Socket::INET (

這次的任務是統計一周內的top500詞條。資料來源：來自於oracle資料庫。需求：產生excel表格並發送郵件給相關人。   

三、java相關     這裡shell程式調用java程式的原因是：perl指令碼產生的excel檔案，其中的詞條URL無法解碼為人可以識別的漢字（與linux系統編碼相關的，不能改系統編碼，所以要用java程式處理一下perl產生的excel）。例如將http://www.hudong.com/wiki/%E5%8D%95%E6%9B%B2%E5%BE%AA%E7%8E%AF%E7%97%87解碼為http:www.hudong.com/wiki/單曲迴圈症 儲存到新的excel中。   

Perl命令列http://developer.51cto.com/art/201007/213087.htmPerl模式比對中的特殊字元用法指南http://developer.51cto.com/art/201007/213056.htmPerl Hash用法之入門教程http://developer.51cto.com/art/201007/213695.htm常見Perl

用子程式去掉從檔案讀取的每行的首尾空格，sub函數print的值已經沒有空格了，但是傳回值列印出來還是有空格。代碼如下：while(<FH>){&trim($_);print "$_\n";}sub trim{        my $str=shift;        $str=~s/^\s*//g;        $str=~s/\s*$//g;        print "$str\n";        return

網路編程是一門神秘且複雜的藝術，當然也十分有趣。Perl語言提供了豐富的TCP/IP網路函數，所有這些函數都直接來源於C語言的socket庫函數. 由於Perl語言和C語言的socket庫函數在型式和使用方法上都是一樣的，因此會使用Perl語言進行Socket編程, 當然也就會使用C語言進行Socket編程. 下面是Perl語言中有關的socket庫函數列表： 函數原型 使用說明 accept(NEWSOCKET,GENERICSOCKET)

今天看到了在參數中傳遞引用的一段文章，其中講到了一個問題，自己以前還碰到過，不過最後是通過其他辦法繞過去了。今天看到這個問題可以通過傳遞參數引用來解決。所以打算寫下來。希望可以幫到大家。 我就直接引用這本書中的例子了。 就是如果我們在參數中傳遞兩個數組的時候，會出現一些問題。 sub getarrays{    my(@a,@b) = @_;..} @fruit = qw(apples oranges banana);@veggies = qw(carrot cabbage

由於我們的項目的測試平台很多，包括windows，linux平台。linux提供了一個解壓的unzip命令，但是windows下比較麻煩，win

在perl中當我們需要建立一個進程的時候，一般都是用比較簡單易用的system，exec，或者``(反單引號），這幾種用法都非常簡單，但是他們不能結合一些作業系統中的管道等高效的東西。所以在perl中還有一種建立進程的方法，就是把進程當做檔案控制代碼那樣使用。open(WHOPROC, "who|"); # open who for

尋找子串：index（）和

    中國移動遊戲頻道，遊戲玩家套餐包中的玩家樂園遊戲上線啦，很開心，作為開發人員之一，加了那麼多班，眼看出了成果，激動一下下，哈哈，隨之而來的是各種各樣的pv、uv的資料統計。    領導問：還會寫perl啊？    我答：會一些。        進入這個公司後，確實涉及到過perl指令碼，所以稍稍簡單的還能寫，所以對於領導交代的access_log日誌的處理，我寫完了，貼到自己部落格裡，以備下次回憶。