Perl Index scripting & dom element extracting.