Select Code to Download

#!/usr/bin/perl --
use strict;
...
} ## end sub PumpDump

__END__

$ perl htmltreexpather.pl select.html _tag  option
...
/html/body[@bgcolor='red']/form[@action='/foo.cgi' and @name='queryfoo
+']/select[@name='singlelist']/option[@value='aaa']
------------------------------------------------------------------
##################################################################

$ perl htmltreexpather.pl
Usage: htmltreexpather.pl  file _tag div
...
/html/body[@topmargin='0' and @marginwidth='0' and @leftmargin='0' and
+ @bgcolor='#FFFFFF' and @onload='check();' and @marginheight='0']/div
+[11]
------------------------------------------------------------------
##################################################################