[已解决]文件句柄放于哈希数组中怎么使用 &lt;&gt; 读取？

kinpoo

UID: 42055
帖子: 166
积分: 381
在线时间: 1 天 13 小时

1^# kinpoo 发表于 2008-01-21 17:42

[已解决]文件句柄放于哈希数组中怎么使用 &lt;&gt; 读取？

#! /usr/bin/perl

my $out = \*STDOUT;
my $in = \*STDIN;

print $out "Please input: ";
$_ = <$in>;
print "Re: $_\n";

my %outsHash = (
"STDOUT" => \*STDOUT
);

my %insHash = (
"STDIN" => \*STDIN
);

print {$outsHash{"STDOUT"}} "\nPlease input: ";
$_ = <$insHash{"STDIN"}>; # 这样是不可以的
print "Re: $_\n";

addf

UID: 20776
帖子: 1
积分: 2
在线时间: 10 分钟

2^# addf 发表于 2008-01-21 19:30

my $fh=$insHash{"STDIN"};
$_ = <$fh>;
<>里面不是简单标量就会被当glob

kinpoo

UID: 42055
帖子: 166
积分: 381
在线时间: 1 天 13 小时

3^# kinpoo 发表于 2008-01-21 20:20

也就是说无法直接在 <> 使用hash等复杂的变量咯？
灵活的Perl不太灵活了

flw

UID: 21204
帖子: 144
积分: 331
在线时间: 1 天 4 小时

4^# flw 发表于 2008-01-21 20:44

QUOTE:

原帖由 kinpoo 于 2008-1-21 20:20 发表
也就是说无法直接在使用hash等复杂的变量咯？
灵活的Perl不太灵活了

perldoc -f readline and google “哈夫曼编码”

kinpoo

UID: 42055
帖子: 166
积分: 381
在线时间: 1 天 13 小时

5^# kinpoo 发表于 2008-01-21 21:14

QUOTE:

原帖由 flw 于 2008-1-21 20:44 发表

perldoc -f readline and google “哈夫曼编码”

谢谢

google “哈夫曼编码” 好像没有直接的关系……

duhast

UID: 4411
帖子: 83
积分: 190
在线时间: 9 小时

6^# duhast 发表于 2008-01-22 00:15

答案: 你不能

Perl 支持 <FILEHANDLE> 或者是 <$scalar> .
其他的形式被解释为glob.

QUOTE:

原帖由 kinpoo 于 2008-1-21 20:20 发表
也就是说无法直接在使用hash等复杂的变量咯？
灵活的Perl不太灵活了

[已解决]文件句柄放于哈希数组中 怎么使用 &amp;lt;&amp;gt; 读取？

[已解决]文件句柄放于哈希数组中 怎么使用 &amp;lt;&amp;gt; 读取？

[已解决]文件句柄放于哈希数组中怎么使用 <> 读取？

[已解决]文件句柄放于哈希数组中怎么使用 <> 读取？