Michael G Schwern <[EMAIL PROTECTED]> writes:
> so if $key does not exist you'll get 'some default' instead of undef.
Except that a more common case is
my $foo = $hash{foo} || 'some default';
my $bar = $hash{bar} || 'some other default';
-- Johan
Here's a fixed version of that patch I sent a while back:
Index: Parrot/Opcode.pm
===
RCS file: /home/perlcvs/parrot/Parrot/Opcode.pm,v
retrieving revision 1.7
diff -u -r1.7 Opcode.pm
--- Parrot/Opcode.pm2001/09/20 14:39:17
I'm attaching a patch which adds a "lint" target to the makefile (running
lclint with some very lenient settings) and fixes some of the things it
was griping about.
The changes are all pretty trivial, and fall into the following categories:
- handle return values which were being ignored (
