diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2004-10-13 09:23:17 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2004-10-13 09:23:17 +0000 |
| commit | 078acf88d3cc0a0b009690c5cbf951277c041598 (patch) | |
| tree | d9532b4aaba79d7b0139cc43fb14dce33c744155 /perl_checker.src | |
| parent | 0e8d5a3cd1b213b624e8c3bab928b514220db27a (diff) | |
| download | perl-MDK-Common-078acf88d3cc0a0b009690c5cbf951277c041598.tar perl-MDK-Common-078acf88d3cc0a0b009690c5cbf951277c041598.tar.gz perl-MDK-Common-078acf88d3cc0a0b009690c5cbf951277c041598.tar.bz2 perl-MDK-Common-078acf88d3cc0a0b009690c5cbf951277c041598.tar.xz perl-MDK-Common-078acf88d3cc0a0b009690c5cbf951277c041598.zip | |
*** empty log message ***
Diffstat (limited to 'perl_checker.src')
| -rw-r--r-- | perl_checker.src/test/return_value.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl_checker.src/test/return_value.t b/perl_checker.src/test/return_value.t index a781033..b4786f5 100644 --- a/perl_checker.src/test/return_value.t +++ b/perl_checker.src/test/return_value.t @@ -10,9 +10,9 @@ $xxx && yyy(); value is dropped /(.*)/; value is dropped -'xxx'; +'xxx'; value is dropped -'xxx' if $xxx; +'xxx' if $xxx; value is dropped map { xxx($_) } @l; if you don't use the return value, use "foreach" instead of "map" |