perl中一些问题
来源:互联网 发布:2017单片机就业方向 编辑:程序博客网 时间:2024/06/05 19:14
开发中遇到的几点问题:
1. split的分隔符不能使用字符串,只能使用正则表达式。
用perl -de 1; 启动后做实验:
DB<1> x split '//', 'a//b//c'
Trailing / in regex m/// at (eval 13)[/usr/lib/perl5/5.8/perl5db.pl:628] line 2.
DB<2> x split '////', 'a//b//c'
0 'a'
1 'b'
2 'c'
DB<3> x split ////, 'a//b//c'
0 'a'
1 'b'
2 'c'
试图指定分隔符为反斜杠,但 '//' 出错,原因是perl会将第一个参数(字符串)的值作为正则表达式来解释,结果 '//' 就变成了 /// ,显然这是错误的正则表达式。正确的写法是 '////' 被解释成 ////,或者直接写 ////。
读了bkブログ的文章后发现,perl的split函数是忽略末尾的空元素的,想让它不忽略,必须加个参数-1:
DB<38> x split /,/, 'a,b,,c,,'
0 'a'
1 'b'
2 ''
3 'c'
DB<39> x split /,/, 'a,b,,c,,',-1
0 'a'
1 'b'
2 ''
3 'c'
4 ''
5 ''
更多内容请点开看。
2. 如何计算多个数组中唯一元素的数目?
如,三个数组引用 $a、$b、$c,要计算三个数组中不重复的元素有多少个。用foreach挨个去数,显然不是什么明智的办法。
print scalar keys %{{ map { $_ => 1 } (@$a, @$b, @$c) }};
3. 类型的相互转化
上例中可以看到使用 %{{ @a }} 的方式将数组转换成了散列。不难明白,@a是数组,{ @a } 就成了散列的引用,再加上 % 变成 %{{@a}},就是散列了。
4. 函数调用并非传值也非传引用
许多人认为perl函数调用时会像C语言那样传值调用,想直接修改参数,就必须传引用才行。其实并非如此。
#!/usr/bin/perl
sub foo {
print '$_[0] = ', /$_[0], "/n";
my $str = shift;
print '$str = ', /$str, "/n";
}
$a = "hello";
print '$a = ', /$a, "/n";
foo($a);
运行结果:
$a = SCALAR(0x1002e994)
$_[0] = SCALAR(0x1002e994)
$str = SCALAR(0x1002e940)
这就证明,函数内被传递的参数$_[0]与调用时的$a是同一个变量(不仅是相同的变量,而且是同一变量)。此时修改$_[0]就等于在修改$a。但我们一般都会在函数开头写上 $str = shift,将参数保存到$str中,就是在这时,$a和$str就不再是同一变量,对$str的修改也不会影响到$a了。
根据这一点,就可以从函数中操作调用时的参数,而不用传引用。
- perl中一些问题
- perl一些问题
- perl 函数参数中传递数组和引用的一些问题
- perl 函数参数中传递数组和引用的一些问题
- perl http 请求一些奇怪的问题
- perl应用:一些perl例(不断更新中ing........)
- Perl中Schwartzian转换问题
- perl 中一些常用的正则匹配
- perl中关于字符串的一些函数
- perl中一些特殊符号用法 z
- perl中汉语匹配的问题
- Perl中SendMail发送邮件问题
- Perl中system的返回值问题
- [Perl] 关于 Bugzilla 的一些问题与研究
- 安装perl和DBI-mysql出现的一些问题
- perl中split分割字符串用法坑人的一些细节!!
- Perl 问题
- CYGWIN中一些问题
- [Perl]引用传递和值传递
- [Perl]用hash引用时别忘了初始化
- [Perl]关于m//g的问题
- [Perl]管道、进程及其他
- [Perl]用XML::Simple解析XML文件
- perl中一些问题
- Office2010新体验-基于Office Visio 2010 图表绘制新体验
- Hibernate非主键自动增长方法
- oracle中Date类型字段数据插入格式
- Eclipse插件安装
- 解决Win7小工具不出现的方法
- 为什么自动化开发者比AUT开发者面临更多的挑战?
- Oracle监听程序当前无法识别连接描述符中请求的服务
- 欢迎光临~