xavi_siege的专栏

#!/usr/bin/perl -w eval 'exec /usr/bin/perl -w -S $0 ${1+"$@"}'     if 0; # not running under some shell     当我们不确定perl安装目录的时候可以这么写 #!/usr/bin/perl -w eval “exec perl -w -S $0 $@”     if 0; #

还在perl中拼命的写if...elsif...elsif..else...么，其实perl有switch， 而且我感觉perl的switch比神马高级语言的switch都强大。 look： 测试结果： 如果在一个block中有一个my修饰的变量和外界的一个变量同名，而且又需要在这个block中使用外界变量时，两个办法：      第一个办法，用main的package修饰这