Time of Update: 2017-01-13
在Linux環境下安裝Perl其實是非常簡單的,但我這裡記錄一下的原因,是因為在安裝後,一直有一個問題困擾著我,那就是我設定的安裝目錄始終不起效,弄得我一直以為安裝沒有成功,但後來我發現其實是已經安裝成功了的,閑話不多說了,記錄一下。先從官網下載一個最新版本的perl吧,官網地址如下:http://www.perl.org/目前最新的版本是perl-5.20.0,順便說一句,我之所以要安裝perl的原因是我伺服器上的perl實在是版本太低了!下載後解壓,運行命令安裝如下:
Time of Update: 2016-07-09
標籤:ucloud api文檔中對簽名加密的方法實在看不明白,而且沒有perl版本,特意寫了一份供大家參考use URI::Escape;use utf8;use Encode;use AnyEvent::HTTP::LWP::UserAgent;use Digest::SHA qw(sha1 sha1_hex sha1_base64);sub ucloudApiConn { my ( $publicKey, $privateKey, $baseUrl, $paramData ) = @
Time of Update: 2016-12-25
標籤:blog error 目錄 fail miss makefile write ror ima perl下安裝模組可以使用cpan命令,但是通常我們不具有root使用者權限,所以
Time of Update: 2016-12-09
標籤:perl es elasticsearch 在搭建Elasticsearch資料庫的過程中,首先使用了其推薦的Logstash工具匯入資料,但是用起來非常不順手,所以想用Perl擅長的Regex對資料進行過濾分類,然後匯入Elasticsearch,於是搜尋CPAN找到了Search::Elasticsearch模組。該模組在CPAN上的文檔寫的比較簡潔,於是將使用過程中的經驗總結如下:一
Time of Update: 2016-12-06
標籤:轉化 sci org unp 複雜 跳過 bsp pre 字串 這個pack, unpack在 “perl語言編程” 有介紹看起來很複雜 1 #把一個字串轉為十六進位格式 2
Time of Update: 2016-12-01
標籤:詞法 pre bin 存在 return style 特定 列印 引用 我個人理解,就是當一個變數超出範圍時,應是消失了,不見了的,但你還能訪問它,這就是閉包。##看下面的例子。#!/us
Time of Update: 2016-10-23
標籤:passwd line apple 合并 strong 10個 反向 變數 dos Perl命令列常見用法及技巧懶人營運 來源: 懶人營運 &nb
Time of Update: 2016-09-14
標籤:在perl中存在幾種控制代碼使用的方式,其中open為最基礎的使用方法,下面把我遇到的幾種控制代碼的使用方法做一個小小的總結: open方法的使用:open方法是教程中最基礎的開啟檔案的控制代碼使用方法,較為常見教程中給出的使用方式有三種使用方式open FILEHANDLE,EXPRopen FILEHANDLE,MODE,LIST open FILEHANDLE我在這裡只介紹簡單的使用方式,其它的可自行進行擴充學習。open檔案內容的讀取和寫入:use
Time of Update: 2016-09-13
標籤:一) sort函數用法sort LISTsort BLOCK LISTsort SUBNAME
Time of Update: 2016-08-10
標籤:同時學perl、python和shell指令碼會很容易將它們的文法搞混,本文主要是一個個人的總結,方便要用時的查詢。 perl基本文法、安裝、協助文檔 檔案頭格式: #!/usr/bin/perluse strict;use warnings;運行perl指令碼: #調用perl程式perl test.pl#可執行指令碼chmod 755 test.pl./test.pl基本讀寫: #鍵盤輸入$a = <STDIN>;chomp($a);print $a;#
Time of Update: 2016-08-05
標籤:來源:http://www.cnblogs.com/itech/archive/2013/02/20/2919204.html http://stackoverflow.com/questions/5703705/print-current-directory-using-perl?rq=1 1)The following get the script‘s directory, which is not the same as the current
Time of Update: 2016-08-05
標籤:來源:perl的map函數的使用: 文法map EXPR, LIST 這個當中有,map BLOCK LIST 這個當中沒有, 定義和使用對list中的每個元素執行EXPR或BLOCK,返回新的list。對每一此迭代,$_中儲存了當前迭代的元素的值。 傳回值如果傳回值儲存在scalar標量中,則代表map()返回數組的元素個數;如果傳回值儲存在list中,則代表map()函數的數組; 執行個體1 (將單字首大寫) 1 Code
Time of Update: 2016-08-05
標籤:來源:http://www.cnblogs.com/itech/archive/2012/12/17/2822044.html 安裝你自己的perl modules。當沒有root許可權的時候,需要安裝perl modules到自己的home目錄下。來自:http://servers.digitaldaze.com/extensions/perl/modules.htmlInstalling Perl5 Modules LocallyNormally, the Perl5
Time of Update: 2016-08-05
標籤:來源:http://www.cnblogs.com/itech/archive/2012/08/07/2627267.html 代碼:需要顯式地定義變數且初始化。例如optionX。如果沒有定義變數且顯式初始化,且沒有在命令列指定選項,則選項對應的變數將為未定義。 1 #!/bin/perl-5.8.3/bin/perl$ 2 use warnings; 3 use strict; 4 5 use Data::Dumper; 6 use Getopt::Long; 7 use
Time of Update: 2016-08-05
標籤:來源:http://www.jb51.net/article/35528.htm perl中our的用法require 5.006當版本號碼小於 5.006 的時候,會返回失敗,從而導致模組載入失敗。所以它的作用就是保證模組調用環境的 Perl 版本。our 和 my 一樣,都是對變數的聲明,不過 our 聲明的是包全域變數,而 my 聲明的是詞法變數。不過,經過 our 聲明的變數,它會變得像一個詞法變數一樣,其實這也是 our 存在的目的:用來欺騙 strict
Time of Update: 2016-08-04
標籤:來源:http://www.cnblogs.com/itech/archive/2012/09/23/2698838.html 參考: 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-c
Time of Update: 2016-07-24
標籤:在UNIX/Linux 系統上,開啟命令終端,輸入 ‘rpm -q perl‘ 查看系統是否安裝了 perl ---- 在自己的CentOS7 系統上,預設內建了 perl 軟體:[email protected]:~/Documents/bash$ rpm -q perlperl-5.16.3-286.el7.x86_64可以看到系統預設已經安裝了 perl5 軟體。查看安裝位置:[email protected]:~/Documents/bash$ which
Time of Update: 2016-07-16
標籤:在perl中系統調用有兩種方式,一種是system(cmd),另一種是`system`以前一直沒注意,這兩種方式的區別,還以為是一樣的,今天寫指令碼的時候,忽然想要擷取命令的傳回值,然後,用了my $result = system(‘ls‘);發現,命令的結果並沒有返回給$result,而是直接,列印到螢幕上了,所以,這麼搞是要完蛋的,而改成my $result =
Time of Update: 2016-07-09
標籤:text:(1+2(123+(888)3)ddf)wwww(sdf(sdfdsf)gggg)Match:1+2 123+ 888 3 ddf sdf sdfdsf gggg符合代碼:#!/usr/bin/perluse strict;use warnings;use re ‘eval‘;my $str= ‘(1+2(123+(888)3)ddf)wwww(sdf(sdfdsf)gggg)‘;my @arr;my $re = qr/(?{local $a=0})(?>(?:([^()]
Time of Update: 2016-07-07
標籤:use SVG;# new SVG my $svg = SVG->new(width => 4000,height => 5000,);# text object , 關鍵是字型類型,起先只用 ‘font’ => ‘Arial‘,網頁顯示的字型看起來不是Arial,不知道為啥呢。總之設定成‘font-family’,就好了。 $svg -> text(id =>‘txttitle‘,x => 100