- $packages{$_} = 1 for split /,/, $status->{package};
- $packages{$_} = 1 for split /,/, $status->{source};
+ if (defined $status->{package}) {
+ $packages{$_} = 1 for split /,/, $status->{package};
+ }
+ if (defined $status->{source}) {
+ $packages{$_} = 1 for split /,/, $status->{source};
+ }