5 while($line = <STDIN>) {
7 if($line =~ /table width/) {
9 if($line =~ /height="50"/) {
15 } while (!($line =~ /table/));
18 if($line =~ /height="35"/) {
19 ## Change this uggly table into a h2
23 } while (($line =~ /</));
28 } while (($line =~ /</));
29 print "<h1>$title</h1>\n";
34 if($line =~ /Disclaimer:/ || $line =~ /body>/) {
38 if($line =~ /This document was translated f/) {