代码:
- sub TC {
-
- my $c = 3;
-
- my $d = 4;
-
- return $c,$d;
-
- }
-
- my ("$a",) = TC(); #引号
-
- print "$a $b";
perl 提示错误
D:\>perl 02.pl
Can't declare string in "my" at 02.pl line 7,near ") ="
Execution of 02.pl aborted due to compilation errors.
- sub TC {
- my $c = 3;
- my $d = 4;
- return $c,$d;
- }
- my ($a,) = TC(); #没有引号
- print "$a $b";
D:\>perl 02.pl
3
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 [email protected] 举报，一经查实，本站将立刻删除。
