请教达人

xuxingyu

UID: 36969
帖子: 122
积分: 280
在线时间: 20 小时

1^# xuxingyu 发表于 2008-01-29 15:31

请教达人

[Copy to clipboard] [ - ]

CODE:

my @vars = qw(REMOTE_ADDR REMOTE_PORT REQUEST_URI QUERY_STRING);
my @stuff = @ENV{@vars};
my $info = join("|","@stuff");

其中的@ENV{@vars}不解，达人们能给讲讲吗

apile

UID: 42255
帖子: 66
积分: 151
在线时间: 6 小时

2^# apile 发表于 2008-01-29 17:26

他是在读取HTTP Header中带来的Client端 IP/Port,要求的URI与Query_STRING数据.....
perldoc 中有关hash的运作应该有讲才对...
@ENV{@vars}
等於
($ENV{REMOTE_ADDR},$ENV{REMOTE_PORT} .....)
只是比较懒惰的写法....

xuxingyu

UID: 36969
帖子: 122
积分: 280
在线时间: 20 小时

3^# xuxingyu 发表于 2008-01-29 18:03

QUOTE:

原帖由 apile 于 2008-1-29 17:26 发表
他是在读取HTTP Header中带来的Client端 IP/Port,要求的URI与Query_STRING数据.....
perldoc 中有关hash的运作应该有讲才对...
@ENV{@vars}
等於
($ENV{REMOTE_ADDR},$ENV{REMOTE_PORT} .....)
只是比较懒 ...

好的多谢，我验证一下

FinalBSD

UID: 46729
帖子: 18
积分: 41
在线时间: 10 分钟

4^# FinalBSD 发表于 2008-01-29 22:47

my @stuff = @ENV{@vars};
这是hash slice，具体可以man perldata