foreach my $form (@forms) { my @fields = $form->inputs; foreach my $input (@fields) { print $input->type() . "\t $page / 15\n"; } }