Time of Update: 2017-01-13
在運行Apache的環境安裝mod_perl,執行Perl指令碼。安裝mod_perl 代碼如下複製代碼 # yum -y install mod_perl使用PerlRun模式讓Perl編譯器常駐記憶體 代碼如下複製代碼 # vi /etc/httpd/conf.d/perl.confAlias /perl /var/www<Directory
Time of Update: 2017-01-13
Perl是一種深受世界各地開發人員喜愛的實用摘要和報表語言,雖然它是在Unix上誕生和發展起來的,但在Windows編程領域也已經佔有一席之地。 在ActiveState等公司的領導之下,從1995年中期開始Perl開始了穩定地發展,不僅增加了標準的Perl功能,而且增加了許多面向Windows的功能,比如OLE和COM整合等。
Time of Update: 2017-01-13
今天用CPAN安裝Term::ReadLine,報了個這樣的錯誤Going to read /root/.cpan/sources/modules/03modlist.data.gz Can't locate object method "data" via package "CPAN::Modulelist" (perhaps you forgot to load "CPAN::Modulelist"?) at (eval 31)
Time of Update: 2017-01-13
因為 Perl 的編譯安裝比較麻煩,難倒很多人.我特意給最新的 Perl 6 打成了 centos 6 上可以直接安裝的 rpm 包.只要給下面三個東西安裝上就好了. 代碼如下複製代碼 rpm -ivh http://repo.php-oa.com/6/RPMS/x86_64/nqp-2014.04-1.0.el6.x86_64.rpmrpm -ivh http://repo.php-oa.com/6/RPMS/x86_64/moarvm-2014.04-1.0.el6.x8
Time of Update: 2017-01-13
本款免費全能空間支援asp,.net,PHP、CGI、Perl、Ruby、Python、SSI 哦,還免費提供2個mysql資料庫。秀山熱線提供200M全能免費空間申請 該免費全能空間大小為:200MB ;不限制流量 ;支援ASP/PHP/.NET/HTM/ ;支援FTP方式上傳與管理 ,無廣告支援BBS論壇,可申請多個空間申請地址:http://idc.cqxsrx.com50MB免費PHP/CGI/JSP空間申請該免費全能空間大小為:50MB ;月流量限制為:3GB
Time of Update: 2017-01-13
免費,輕鬆視窗主機 的ASP 3.0 , Perl中, PHP4 不僅的ASP您也可以執行Perl和PHP指令碼的所有計劃。 沒有彈出必填 不同於其他免費託管服務提供者,我們不要求您有任何彈出式視窗或橫幅在您的網站上,可以完全控制您的網站內容。 充分FTP訪問 沒有惱人的瀏覽器為基礎的系統,你就會得到充分的FTP訪問您的網站上傳內容。 10 , 100 , 1,000或無限 如果它只是網路空間您需要然後這些計劃是理想的,只是決定多少空間您所需要的。 專業計劃
Time of Update: 2017-01-13
前言 PHP被大量的應用於Web的後台CGI開發,通常是在使用者資料資料之後得出某種結果,但是如果使用者輸入的資料不正確,就會出現問題,比如說某人的生日是"2月30日"!那應該怎麼樣來檢驗暑假是否正確呢? 在PHP中加入了正則運算式的支援,讓我們可以十分方便的進行資料匹配。2 什麼是Regex:
Time of Update: 2017-01-13
Hello World一個簡單的hello world例子: 代碼如下複製代碼 #!/usr/bin/env perluse strict;use warnings;use CGI::Fast;while(my $q = new CGI::Fast){ print $q->header("text/plain"); print "Hello World";}
Time of Update: 2017-01-18
同其他大多數程式設計語言一樣,Perl中的單行注釋也是#開頭,例如:複製代碼 代碼如下:#print "Hello,World!";但多行注釋,不同的語言有不同的注釋方式,比如說:Java,C/C++: 複製代碼 代碼如下:/* *注釋若干行 *注釋若干行 *注釋若干行*/Python:複製代碼
Time of Update: 2017-01-18
本文我們學習如何用Perl對字串或者數字數組進行排序。Perl有個內建函數叫做sort毫無疑問的可以排序一個數組。 其最簡單的形式是傳遞一個數組,它會返回排序後的元素組成的數組。@sorted = sort @original。基於ASCII碼排序複製代碼 代碼如下:#!/usr/bin/perluse strict;use warnings;use 5.010; use Data::Dumper qw(Dumper); my @words = qw(foo bar
Time of Update: 2017-01-18
其它一些程式設計語言中,有函數ltrim和rtrim分別用於從字串開頭和末尾刪除空格和定位字元。 也有的提供了函數trim來刪除字串兩端的空白字元。Perl裡沒這些函數因為簡單的Regex替換就能實現這個目的(不過我確信CPAN有很多模組實現了這些函數)。事實上這太簡單了以至於成了帕金森瑣碎定理裡的一個顯著主題。左側整理ltrim或者lstrip從字串左側刪除空白字元:複製代碼 代碼如下:$str =~ s/^\s+//;從字串開頭^開始匹配一個或者多個空白字元(\s+),並將之替換成Null
Time of Update: 2017-01-18
PPM(Programmer's Package Manager)是ActivePerl內建的一個圖形化管理工具,有了這個工具,要升級,更新,移除Perl的Package都非常方便。只需要輸入ppm 或者 ppm gui就可以開啟圖形介面。畢竟用cpanm來安裝的話,你也必須知道要安裝的模組名,不是很方便,查詢起來也麻煩,要上cpan專門的網頁去查。複製代碼 代碼如下:C:\>ppm 或者 複製代碼 代碼如下:C:\>ppm gui
Time of Update: 2017-01-18
工作需要開始學Perl,下載個Window版(5.16)的: 下載連結 http://www.activestate.com/activeperl/downloads安裝好了之後,寫第一個perl程式複製代碼 代碼如下:#!/usr/bin/perl print "Hello,World!\n"; 運行結果: (很像Python哦)複製代碼 代碼如下:c:\Perl>perl HelloWorld.pl Hello,World!
Time of Update: 2017-01-18
Perl認為真值是自明的(self-evident), 表示任何事物的真值都可以計算。Perl以實用的方式來定義真值,即一個實體的真值取決於這個實體的類型。Perl總是樂觀的認為:這個世界上真的東西遠比假的東西多的多。Perl區別與任何其他電腦語言,Perl是語言學家創造的,而語言的意思離不開上下文語境,所以Perl中的真值都可以在標量(標量$與數組@類似於英文中的單數與複數, book 與 books的區別,
Time of Update: 2017-01-18
使用signal,能讓你的程式功能更豐富。要在Linux下列出所有的signal, 利用kill -l即可。 下面是我機器上的輸出(後面還有到64的沒列出來):複製代碼 代碼如下:xuyang@xuyang-desktop:/$ kill -l1) SIGHUP 2) SIGINT 3) SIGQUIT 4) SIGILL 5) SIGTRAP6) SIGABRT 7) SIGBUS 8 ) SIGFPE 9) SIGKILL 10) SIGUSR111) SIGSEGV 12) SIGUSR2
Time of Update: 2017-01-18
#mode operand create truncate#read < #write > yes yes #append >> yesCase 1: Throw an exception if you cannot open the file:複製代碼 代碼如下:use strict;use warnings; my $filename = 'data.txt';open(my $fh, '<
Time of Update: 2017-01-18
#!/usr/bin/perl -wuse strict;use File::Spec;local $\ ="\n";#當前模組的每行輸出加入分行符號 my %options;#目錄路徑$options{single_case} = '/home/jiangyu/src/pl/Example'; my @cases; if (-d $options{single_case}) {#判斷目錄是否存在 my @files; my $dh; push(@files,
Time of Update: 2017-01-18
一、列表列表是包含在括弧裡的一序列的值,可以為任何數值,也可為空白,如:(1, 5.3 , "hello" , 2),空列表:()。註:只含有一個數值的列表(如:(43.2) )與該數值本身(即:43.2 )是不同的,但它們可以互相轉化或賦值。列表例:複製代碼 代碼如下: (17, $var, "a string") (17, 26 << 2) (17, $var1 +
Time of Update: 2017-01-18
一、開啟、關閉檔案 文法為open (filevar, filename),其中filevar為檔案控制代碼,或者說是程式中用來代表某檔案的代號,filename為檔案名稱,其路徑可為相對路徑,亦可為絕對路徑。複製代碼 代碼如下: open(FILE1,"file1"); open(FILE1,
Time of Update: 2017-01-18
一、簡介模式指在字串中尋找的特定序列的字元,由反斜線包含:/def/即模式def。其用法如結合函數split將字串用某模式分成多個單詞:@array = split(/ /, $line);二、匹配操作符 =~、!~=~檢驗匹配是否成功:$result = $var =~ /abc/;若在該字串中找到了該模式,則返回非零值,即true,不匹配則返回0,即false。!~則相反。這兩個操作符適於條件控制中,如:複製代碼 代碼如下: if ($question =~