Perl中ftp的應用

2021-05-27 19:14:15 字數 659 閱讀 1358

連線ftp有兩種連線模式，預設模式和passive模式。

ftp伺服器工作在預設模式下，連線比較簡單：

use net::ftp;


#initial ftp 


my $ftp = net::ftp->new($ftpserver,debug => 0, timeout => 60) 


or return -1;


$ftp->login($ftpusername, $ftppassword)


or return -1;


#get file


$ftp->binary or die "cannot change binary mode ", $ftp->message;


#cd remote


$ftp->cwd($remotedir) if($remotedir ne '');


my @files = $ftp->ls('*'.$lasthour.'*') or return -1;#獲取檔案列表


foreach my $file (@files)


$ftp->quit;
在passive模式下，之需要開啟乙個引數即可：

$env = 1; #passive mode
這樣就可順利建立連線了~

平台無關的Perl應用

最近由於專案需求，需要把再windows平台上執行的 perl程式移植到linux平台上。由於是第一次做類似的事情，結果折騰了很久，實在是無比痛苦啊。那種看著程式無法執行的感受真的是。憋屈！先說一下背景吧。原來實在windows上利用perl對staf進行包裝，做為整個automation框架中的一...

perl 1 perl中的數字

下面是在perl中的要點記錄 1 在perl中只有雙精度浮點數，也就是我們常說的double。在perl中我們看到的整數和浮點數，只是我們看的樣子和形式不同而已，其實在perl的內部它全部作為雙精度浮點數來運算。2 浮點數可以以十進位制的指數來記，符號是 e 並不區分大小寫，如 1.2e20,1.2...

perl 中的引用

perl 語言中的引用共分為兩類 宣告引用時只需要在物件的前面加上反斜槓 第一列是陣列的引用 示例 my array 1,2,3 my array ref array 第二種是雜湊的引用 示例 my hash 1,2,3,4 my hash ref hash 通過引用去訪問對應的值，通過 操作符 陣...