or download this
--- Html.pm 2005-07-01 14:48:23.000000000 +0100
+++ Html.pm.new 2005-07-01 14:48:52.000000000 +0100
...
# we've got a name/ident (no quotes)
( $page, $ident ) = ( $1, $2 );
### print STDERR "--> L<$par> to page $page, ident $ident
+\n";