第一个问题：
chomp 完了，返回空串，即 $new_id = '' ;
if ( $new_id eq '' ) { die "sfsfa" }
2009/10/15 bio_gzd <[email protected]>
> 各位高人,我有几个问题想要问问.
> 1. 有如下程序段.
> my $new_tid = undef;
> chomp ($new_tid = <STDIN>);
>
> if (defined($new_tid)) {
> print "sucess";
> } else { print "nothing"; }
>
> $new_tid = <STDIN>; 这里,我是输入一个空行(只有一个<CR>),但已经被chop掉了,也就是说这里对人来说已经是undef
> 无意义了,那为什么条件判断那里会返回为真呢?应该用什么方法去写这个条件判断?
>
>
> . <perlchina%[email protected]>--
> Yours Sincerely
> Zeng Hong
>
--~--~---------~--~----~------------~-------~--~----~
您收到此信息是由于您订阅了 Google 论坛“PerlChina Mongers 讨论组”论坛。
要在此论坛发帖，请发电子邮件到 [email protected]
要退订此论坛，请发邮件至 [email protected]
更多选项，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问该论坛
-~----------~----~----~----~------~----~------~--~---
