3个小问题 请教大家，（不是狮子大开口了，呵呵）~~

3个小问题 请教大家，（不是狮子大开口了，呵呵）~~
各位帮我看看 这几个地方我不明白
1 if( $ENV{'SCRIPT_NAME'} ne '' )
{...
}这个条件判断中的条件是什么意思啊 是关于哪方面的知识 告诉我 我去看看
2 if( rindex( $ENV{'SCRIPT_NAME'}, '/' ) > 0 )
也是上面的疑问
3 .= 这个符号要怎么用呢 看书上的我明白了 但是实际中就不懂了 我举个例子：
$str .= "<FRAMESET FRAMEBORDER=0 FRAMEBORDER=NO BORDER=0 FRAMESPACING=0 ROWS=$top,$sep,*>\n";（其中$sep=0 $top=91 $menu=100）
谢谢哪位给我看看 我等着回复 多谢了！

$ENV{'SCRIPT_N...
$ENV{'SCRIPT_NAME'} 是个环境变量，不懂的话写个程序输出所有 %ENV 就知道了

3 是连接符号，比如
$a = '1';
$a .= '2';
那么 $a 就是 12 了

1. $ENV{ }是用...
1. $ENV{ }是用来取环境变量的值
想打印显示全部环境变量,看代码:

[color=blue]foreach (keys %ENV){
print "$_ : $ENV{$_}\n";
}
[/color]

2. rindex是反向查找定位,自已看perl书中Function Instruction部分,不说了,我都饿晕了,PM8:40了~~~~~~~可怜的我

呵呵 多谢 多谢
呵呵 多谢 多谢

2 if( rindex( ...
2 if( rindex( $ENV{'SCRIPT_NAME'}, '/' ) > 0 ) 判断/这个字符在环境变量$EN('SCRIPT_NAME')大于0
rindex与index想同，只是从右边开始
语法
rindex(string,substring,position);
返回子串substring在字符串string中的位置，如果不存在返回-1,参数position是可选的，表示从该位置开始

if( $ENV{'SCRI...
if( $ENV{'SCRIPT_NAME'} ne ' ' )之中这个ne后加一个空格是什么意思呢 我看书怎么没有看到呢

ne 与 eq 相反，就是不等于（用于字符串比较）。
这话的意思就是这变量不为空时

恩 我知道了 谢...
恩 我知道了 谢谢阿