foreach (@{$self->{_words}}) { foreach my $curr (@{$_->pass_matches}) { # ... } }