X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=bp_bin%2Fgrab;h=8533a4ea3bcff4f398863b6113f7819203a80f9a;hb=8bf958c931357441fca189e45986285e2d1f2476;hp=85063dec0234c82d30e481b15948fd55fc47ef37;hpb=2ea9743691410c29f94d49c03e0ea7617bc9e372;p=biopieces.git diff --git a/bp_bin/grab b/bp_bin/grab index 85063de..8533a4e 100755 --- a/bp_bin/grab +++ b/bp_bin/grab @@ -149,7 +149,7 @@ sub grab_lookup if ( $keys ) { - map { return 1 if exists $lookup_hash->{ $record->{ $_ } } } @{ $keys }; + map { return 1 if defined $record->{ $_ } and exists $lookup_hash->{ $record->{ $_ } } } @{ $keys }; } else { @@ -158,7 +158,7 @@ sub grab_lookup } if ( not $keys_only ) { - map { return 1 if exists $lookup_hash->{ $record->{ $_ } } } keys %{ $record }; + map { return 1 if defined $record->{ $_ } and exists $lookup_hash->{ $record->{ $_ } } } keys %{ $record }; } }