[问]简单perl语法问题

overk

刚开始学/看 perl， 遇到几个问题：

1。$riff=sprintf "\x52\x49\x46\x46";

2。
$b="$at0$at1$at2$at3";
$header="$riff$b$a";   --->是变量值的串联？ 我在看其他人的perl程序，$at0，1，2，3是系统指定的变量？ 没有在之前的程序中出现过

3。$size=sprintf (-s "merge.dat");

各是什么作用。 谢谢

[ 本帖最后由 overk 于 2007-6-26 05:57 编辑 ]

nkcsx

你看的什么材料学perl?

Osment

你看的程序也许写的很随意，也许是故意为之（故意让大家看不懂或者玩花样），Perl的语法很灵活，但是开始学的时候建议从比较正规的语法学起。

简单解释一下：
1。\x52= R  \x49=I \x46=F 。。一种 Geek 的表示办法，至于为什么等于的原因你可以查查字符的内码表。
2。不是串联，是“连接”，这个关心下双引号的用法就明白了。 关于没有出现的变量，一般在没有 use strict;情况下就是空值。
3。 -s 是获取文件的大小。

overk

要写一个工具， 但是不想重新写。 于是就找了open source的一个， 想改一下用。 但只找到perl版的。。于是只能开始看perl。
另外问，程序中出现多次：
seek(READ,0,1);
第二个参数为0， 这样有什么特别意义么？

alexru

perldoc -f seek