Question

perl中“my $content=shift;”什么意思?

用perl编写的tool（用于转换某一个东西）是怎么用的?

Answer 1

先举个列子:

上文应该这样的吧
sub function {
my $content = shift
print $content;

}
下文应该是这样
function ( "haha!" )
执行後会出现 haha!

首先要明白, shift 是将数组的第一个元素 $array[0] 移走, 并将这个元素回传(return).
@arr = ( 1,2,3,4 );
my $str = shift @arr;
现在 $str是 1, @arr 是 ( 2,3,4 )

当你将一些 资料 传入涵数(sub)时, 该涵数里就会有一个叫 @_ 的数组自动生成,
并将你输入的资料存起. shift ; 其实就是 shift @_ 的意思.

Answer 2

shift函数是取数组的第一个元素，缺省就取@_的第一个函数，这句一般用在程序的开头，用于接收程序的参数，或者子函数的开头，用于接收子函数的参数。

Answer 3

数组中的第一个数赋值给content

Answer 4

获取程序传入的参数。
例如你的tool执行为：
./tool 1
那么$content的值就为1

Answer 5

shift 可以得到第一个参数
perl aa.pl 2012

aa.pl种 my $content=shift;
那么$content的值就是2012