Perl

 讀文檔： http://search.cpan.org/~gaas/Digest-MD5-2.39/MD5.pm後，   非常有用章段： This is useful when calculating checksum for files: use Digest::MD5; my $file = shift || "/etc/passwd"; open(FILE, $file) or die "Can't

[oracle@yyjk esb]$ cat a1.pluse DBI; use HTTP::Date qw(time2iso str2time time2iso time2isoz); use Net::SMTP;use Encode;my $dbName = 'ESBDB'; my $dbUser = 'esbdata';my $dbUserPass = 'esbdata'; my $dbh =

標籤：dbi   dbd   DBI:串連所有資料庫的API。DBD:是DBI針對不同資料庫的驅動。DBD::mysqlDBD::PgDBD::SQLite如果沒有,使用cpan安裝即可。######################################################################DBI介面：習慣用法：$dbh資料庫控制代碼$sth語句控制代碼$drh驅動控制代碼$rc布爾類型返回碼$rv整

標籤：#!/usr/bin/perl -w#Description:rerun eod job group by system#Auther:Suzm#Date  :2015-06-23use DBI;use Thread;use strict;push( @INC, $ENV{TPMS_EOD_PERL_LIB} );require public

標籤：c   http   a   com   檔案   使用   1.首先安裝 windows 下的 perl 環境這裡使用 active perl，選擇最新版本 5.16.1：http://www.activestate.com/activeperl/downloads檔案名稱：ActivePerl-5.16.1.

標籤： perl 讀寫xml：主要是寫總是忘記怎麼搞。。。 一 讀xml 1）xml執行個體 <?xml version="1.0" encoding="UTF-8"?> <employees>    <employee age = "30">     <name>linux</name>     <country>US</

標籤：轉載：http://www.ibm.com/developerworks/cn/linux/sdk/perl/culture-8/Spreadsheet::WriteExcel 和 Spreadsheet::ParseExcel在 2000 年，Takanori Kawai 和 John McNamara 編寫出了 Spreadsheet::WriteExcel 和Spreadsheet::ParseExcel 模組並將它們張貼在 CPAN

標籤：style   class   blog   code   http   tar   因為工作當中遇到要處理大資料的excel的玩意，最多的有幾十萬行。用perl的方式試試，看看效果如何。ppm install OLE::Storage_Lite #如果不安裝這個，後面兩個安裝不了 ppm install

標籤：The   upload   ase   package   subscript   loaded   說明   x86_64   ===   如何處理這行錯誤訊息？Please install the gcc make

一、檔案輸入/輸出函數1、基本I/O函數open：允許程式訪問檔案 close：終止檔案訪問 print：檔案寫入字串 write：向檔案寫入格式化資訊 printf：格式化字串並輸出到檔案 1)open函數open函數將檔案變數與某檔案聯絡起來，提供訪問檔案的介面，例如：open(MYVAR, "/u/file"); 如果檔案開啟成功，則返回非零值，否則返回零。預設地，open開啟檔案用以讀取其內容，若想開啟檔案以寫入內容，則在檔案名稱前加個大於符號：open(MYVAR,

作者：半點鐘閑時間：2012-6-4 15：46部落格：blog.csdn.net/cg_i郵箱：b_dx@sohu.com環境：SCO_SV scosysv 3.2 5.0.6 i386      Perl v5.8.7 built for i586-pc-sco3.2v5.0本文 

轉載地址：http://blog.csdn.net/omohe/article/details/1562515使用Perl從檔案中讀取字串，一般有兩種方法：1. 一次性將檔案中的所有內容讀入一個數組中(該方法適合小檔案)：open(FILE,"filename")||die"can not open the file: $!";@filelist=<FILE>;foreach $eachline (@filelist) {        chomp $eachline;}close 

一個轉換程式，簡單的把DNA序列中的A轉變成T，第一種情況沒有使用私人變數。複製代碼 代碼如下:#!/bin/perl#下面是一段DNA序列 $DNA=ATTATATAT;#這裡是我們的序列 $result=A_to_T($DNA); print "I changed all $DNA A to T, and the we get the result $result\n\n"; sub A_to_T { my ($input)=@_;

從而使得有些字元(尤其是寬字元)無法正確地顯示，即不再是utf-8格式了。解決辦法：開啟輸出檔案時即指定編碼格式，就不會出現輸出檔案開啟以後亂碼的情況了。普通的預設open輸出檔案：複製代碼 代碼如下:open(OUTPUT,'>>output.txt')||die"can not open the file: $!";定義指定編碼格式檔案(或者成為使用Perl建立一個指定編碼格式的檔案)：複製代碼 代碼如下:open OUTPUT, ">:encoding(utf-8)",

windows XP安裝配置Perl下載：Apache 1.3.29 ：ActivePerl ：http://activestate.com/store/download.aspx?prdGUID=81fbce82-6bd5-49bc-a915-08d58c2648ca進入View archive of older releases 下載ActivePerl-5.6.1.624-TRIAL2-MSWin32-x86-multi-thread.msimod_perl

Perl中有一些預定義的檔案控制代碼。如標準輸入STDIN、標準輸出STDOUT、和標準錯誤STDERR。標準錯誤STDERR是一個額外的輸出路徑。怎樣理解這句話呢？先來看個例子。% perl -e 'print "Hello, World!\nabc"; print STDERR "Hi\n";'輸出：Hello, World!Hiabc而不是：Hello, World!abcHi這是因為perl

看來的代碼，測試通過#!/usr/bin/perlsub func1 { print "func1 is running\n";}sub func_test { my $func_ref = shift; # ref will return 'CODE' if it's function reference if ( ( ref($func_ref) eq "CODE" ) && defined( &{$func_ref} ) )

代碼： http://xxxxx/cgi/perl-cgi.cgi?name=itech&url=itech.cnblogs.com&p1=test1#!/usr/bin/perl -wT#should use strict and warnninguse warnings;use strict;use CGI;#to debug erroruse CGI::Carp qw(warningsToBrowser fatalsToBrowser);#or debug from com

#!/usr/bin/perl -wuse strict;my @array = (5, 'a', 'c', 10, 'b' );my @new_array = (map { $_*2 if m/\d/; } @array);print "@new_array \n" ;print $#new_array;#print join(",", @new_array), "\n";map用法樣本2 1. 轉換檔名為檔案大小 @sizes = map { -s $_ } @file_names;

本視頻為學習Perl隨堂視頻第二講，主要講解了Perl中數組的使用：650) this.width=650;" alt="perl1(1) 學習Perl 第2講" src="http://www.rhce.cc/wp-content/uploads/file/perl1(1).png" title="學習Perl 第2講" style="border:0px;text-align:center;margin:5px 0px;width:580px;height:350.4166666666667