查看一个变量的值是不是defined,含义和C语言里的NULL差不多。
perl里如果把一个值为undef的变量用于具体操作一般会报错,所以使用之前要判断一下。
可以查下函数文档
perldoc -f defined
perldoc -f undef
From: xsir317 [mailto:xsir317@163.com]
Sent: Tuesday, March 31, 2009 5:18 PM
To: perlchina
Subject: [PerlChina] Re: 去空格
$teststr = "abc 12 3";
print "teststr bf: $teststr \n";
$teststr =~ s/\s+//g;
print "teststr af: $teststr \n";
以上代码OK
顺便问一下,defined是啥呀
2009-03-31
xsir317
发件人: yi wang
发送时间: 2009-03-31 17:02:02
收件人: perlchina
抄送:
主题: [PerlChina] 去空格
遇到个奇怪的问题,下面的代码去掉空格不起作用。平台是winxp+active state perl5.8.8
$teststr = "abc 12 3";
print "teststr bf: $teststr \n";
$teststr =~s /\s+// if defined;
print "teststr af: $teststr \n";
$teststr =~s /\s+//; 编译报错
改为
$teststr =~s /\s+// if defined;后替换不起作用。
搜了很多,都没有结果。请问诸位知道这是怎么回事吗?多谢指教!
<BR
--~--~---------~--~----~------------~-------~--~----~
您收到此信息是由于您订阅了 Google 论坛"PerlChina Mongers 讨论组"论坛。
要在此论坛发帖,请发电子邮件到 perlchina@googlegroups.com
要退订此论坛,请发邮件至 perlchina+unsubscribe@googlegroups.com
更多选项,请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问该论坛
-~----------~----~----~----~------~----~------~--~---
没有评论:
发表评论