欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  IT编程

perl用变量做句柄介绍

程序员文章站 2022-10-08 09:51:02
复制代码 代码如下:#!/usr/bin/perl -wuse strict;use warnings;use filehandle;my %fh;my @array =...

复制代码 代码如下:

#!/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";  此处错误
        $fh{$_}->print( "$_\n" );
    #为filehandle里的函数 或 用(my $h = $fh{$_};  print $h "$_\n";)亦可
 }

注意:上述错误是由于:<>里面不是简单标量就会被当glob,perl 支持 <filehandle> 或者是 <$scalar> .