perl用變量做句柄介紹
更新時(shí)間：2013年02月09日 21:46:10 作者：
在perl代碼中，open 有一個(gè)特殊的地方，就是如果你給它一個(gè)未定義（這是為什么用hash的原因）的變量做間接文件句柄，那么 Perl 會自動為你定義那個(gè)變量，也就是自動把它激活，使它包含一個(gè)合適的文件句柄引用
復(fù)制代碼 代碼如下:
#!/usr/bin/perl -w
use strict;
use warnings;
use FileHandle;
my %fh;
my @array = (1..10);
for(1..5){
open $fh{$_},">$_.txt" or die;
}
for(1..5){
#print $fh{$_} "$_\n"; 此處錯(cuò)誤
$fh{$_}->print( "$_\n" );
#為FileHandle里的函數(shù) 或 用（my $h = $fh{$_}; print $h "$_\n"；）亦可
}
注意：上述錯(cuò)誤是由于：<>里面不是簡單標(biāo)量就會被當(dāng)glob，Perl 支持 <FILEHANDLE> 或者是 <$scalar> .
相關(guān)文章
Perl圖形化包管理工具PPM學(xué)習(xí)使用筆記
這篇文章主要介紹了Perl圖形化包管理工具PPM學(xué)習(xí)使用筆記,本文詳細(xì)講解了什么是PPM、PPM界面的功能按鈕說明、PPM如何安裝卸載包等內(nèi)容,需要的朋友可以參考下2015-06-06
領(lǐng)導(dǎo)有任務(wù),給一批IP列表,ping每一臺機(jī)器,如果沒有響應(yīng)就發(fā)郵件通知,通知的郵件需要分開,不能通知一個(gè)列表,得一封一封的通知2013-02-02
在成塊打印文本的時(shí)候特別有用，需要的朋友可以參考下2013-02-02
通過perl實(shí)現(xiàn)一個(gè)簡單的NIDS
使用perl實(shí)現(xiàn)一個(gè)簡單的NIDS，有需要的朋友可以參考下2013-02-02
perl對長度不一文本的行列進(jìn)行置換的實(shí)現(xiàn)代碼
處理生物數(shù)據(jù)時(shí)，常常需要行列置換，這在R里面異常的簡單容易，一個(gè)t()就解決了2013-02-02
Perl中的文件包含，有三種方法：do, require, 以及use，這里簡單的介紹下方便需要的朋友2013-02-02
Perl文件讀取的經(jīng)典用法，有需要的朋友可以參考下2013-02-02
這篇文章主要介紹了Perl腳本實(shí)現(xiàn)遞歸遍歷目錄下的文件,本文直接給出實(shí)現(xiàn)代碼,代碼中包含明細(xì)注釋,需要的朋友可以參考下2015-04-04
perl命令行參數(shù)內(nèi)建數(shù)組@ARGV淺析
這篇文章主要介紹了perl命令行參數(shù)內(nèi)建數(shù)組@ARGV淺析,本文重點(diǎn)在于講解@ARGV的用法,并通過實(shí)例來說明,需要的朋友可以參考下2014-06-06
讓apache2以cgi方式運(yùn)行perl cgi程序的實(shí)現(xiàn)方法
讓apache2以cgi方式運(yùn)行perl cgi程序的方法，供大家學(xué)習(xí)參考2013-02-02