Nothing simpler or shorter ?
To have the action or the method it's very easy...
Thank's for other idea
Axel R.
>
> my $parsed_html = new HTML::TreeBuilder;
> $parsed_html->parse($html);
> $parsed_html->traverse(\&FindFORM);
> exit;
>
> sub FindFORM {
[...]
> }
>
> sub ThisRoutineParsesOnlyTheForm {
> my ($node, $start, $depth) = @_;
> etc.
> }