关于变量作用域（原译）

这个方法已经知道了，谢谢

兰花仙子 总结的太棒了！
我是个菜鸟，所以看得仔细，还没有看完，发现2处错误，如下。接下来的部分我还会仔细读。


$s=substr("perl5",-2,2);               #这时$s="er"  ------------这时$s应该="l5"


$s=index("perl5","perl");             #这时$s=-1      ----------------$s应该=0

同时也希望得到 兰花仙子 及 各位的指导。

请问 兰花仙子，如下程序中，$| 这个包变量的含义是什么呢？我看小骆驼书中没有这个变量，请问可以详细讲解一下吗？谢谢！


同时在perl中，有很多内置的包变量，比如 $_  $&  $`  $'  $@  @_  @ARGV ，我是个菜鸟，只知道这几个，我想应该还有很多很多。 请问 兰花仙子 可以做一个总结帖出来让我们参考总结吗？

$- 当前页可打印的行数,属于Perl格式系统的一部分

$! 根据上下文内容返回错误号或者错误串

$” 列表分隔符

$# 打印数字时默认的数字输出格式

$$ Perl解释器的进程ID

$% 当前输出通道的当前页号

$& 与上个格式匹配的字符串

$( 当前进程的组ID

$) 当前进程的有效组ID

$* 设置1表示处理多行格式.现在多以/s和/m修饰符取代之.

$, 当前输出字段分隔符

$. 上次阅读的文件的当前输入行号

$/ 当前输入记录分隔符,默认情况是新行

$: 字符设置,此后的字符串将被分开,以填充连续的字段.

$; 在仿真多维数组时使用的分隔符.

$? 返回上一个外部命令的状态

$@ Perl解释器从eval语句返回的错误消息

$[ 数组中第一个元素的索引号

$\ 当前输出记录的分隔符

$] Perl解释器的子版本号

$^ 当前通道最上面的页面输出格式名字

$^A 打印前用于保存格式化数据的变量

$^D 调试标志的值

$^E 在非UNIX环境中的操作系统扩展错误信息

$^F 最大的文件捆述符数值

$^H 由编译器激活的语法检查状态

$^I 内置控制编辑器的值

$^L 发送到输出通道的走纸换页符

$^M 备用内存池的大小

$^O 操作系统名

$^P 指定当前调试值的内部变量

$^R 正则表达式块的上次求值结果

$^S 当前解释器状态

$^T 从新世纪开始算起,脚步本以秒计算的开始运行的时间

$^W 警告开关的当前值

$^X Perl二进制可执行代码的名字

$_ 默认的输入/输出和格式匹配空间

$| 控制对当前选择的输出文件句柄的缓冲

$~ 当前报告格式的名字

$` 在上个格式匹配信息前的字符串

$’ 在上个格式匹配信息后的字符串

$+ 与上个正则表达式搜索格式匹配的最后一个括号

$< 当前执行解释器的用户的真实ID

$ 含有与上个匹配正则表达式对应括号结果

$= 当前页面可打印行的数目

$> 当前进程的有效用户ID

包含正在执行的脚本的文件名

$ARGV 从默认的文件句柄中读取时的当前文件名

%ENV 环境变量列表

%INC 通过do或require包含的文件列表

%SIG 信号列表及其处理方式

@_ 传给子程序的参数列表

@ARGV 传给脚本的命令行参数列表

@INC 在导入模块时需要搜索的目录列表

$-[0]和$+[0] 代表当前匹配的正则表达式在被匹配的字符串中的起始和终止的位置

to :#18 兰花仙子 的帖子
#! /usr/bin/perl
use warnings;
use strict;

{
        local $| = 1;
        for (my $i=0; $i<5; $i++) {
                print "$i ";
                sleep ...
你不要断章取义嘛。这里只能用local不能用my，因为$|是个包变量，用my申明它会是个错误。




那为什么我平时如果不想用\n读取文件的时候，用my $/=">" ,程序怎么不报错？ 这里应该用local $/=">";  ??

$| 控制对当前选择的输出文件句柄的缓冲

怪不得感觉 如下代码 的输出（刚开始时的）很慢。
for (my $i=0; $i<5; $i++) {
        print "$i ";
        sleep 1;
}

感谢各位！