求助代码解读

sdj9999

UID: 33678
帖子: 2
积分: 4
在线时间: 10 分钟

1^# sdj9999 发表于 2007-02-06 15:22

求助代码解读

求助代码解读
@GWCe::ordlin =
map {$_->[0]}
sort {$a->[1] <=> $b->[1] || $a->[0] cmp $b->[0]}
map {[$_ , $udat{$_}{CTLVIS}]}
grep {/^ORDLIN_/ && $udat{$_}{QTYORD} > 0}
keys %udat;

请问这一行代码，该如何理解。@GWCe::ordlin最后得到的结果是什么？

sdj9999

UID: 33678
帖子: 2
积分: 4
在线时间: 10 分钟

2^# sdj9999 发表于 2007-02-06 15:37

($GWCe1->VERSION=__.
($GWCe1->VERSION=__FILE__)=~s!.*?GWCe_([^.]+)\.htm!$1!;
还有这句。。。

sdj9999

UID: 33678
帖子: 2
积分: 4
在线时间: 10 分钟

3^# sdj9999 发表于 2007-02-06 16:10

@GWCe::chgcrtitm=();<.
@GWCe::chgcrtitm=();
$GWCe::crtmsg=();
两句区别在哪?

xinxin

UID: 36570
帖子: 23
积分: 52
在线时间: 10 分钟

4^# xinxin 发表于 2007-02-14 20:57

你好
HUU