dump nicely formatted text for grep
authorDobrica Pavlinusic <dpavlin@rot13.org>
Mon, 16 Aug 2010 15:23:49 +0000 (17:23 +0200)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Mon, 16 Aug 2010 15:23:49 +0000 (17:23 +0200)
docs/parse-html.pl

index 7de3758..0883cfc 100755 (executable)
@@ -18,8 +18,9 @@ while(<$html>) {
        if ( m{<b>(\w+)&nbsp;</b><br>} ) {
                my $command = $1;
                my $param = <$html>;
+               next if $param =~ m{Page #};
                my $description = <$html>;
-               print "$command\t", strip_html($param) , "\t", strip_html($description), "\n";
+               printf "%-4s %-15s %s\n", $command, strip_html($param), strip_html($description);
        }
 }