Select Code to Download

for my $sub (@{$Document->find('PPI::Statement::Sub') || []}) {
    next if $sub->forward;
...
        }
    }
}