- or download this
#!/usr/bin/perl
use strict;
...
# Ship back the modified version.
return $fixed_content;
}
- or download this
print Fixerizer(open (TEST, "test.html") && join ('', <TEST>)); - or download this
<TABLE BORDER=0>
<TR>
<TD ALIGN=left>My Friend</TD>
...
<TD ALIGN=left>My Friend</TD>
</TR>
</TABLE>
- or download this
<TABLE BORDER=0>
<TR>
<TD ALIGN=left>'My Friend'</TD>
...
<TD ALIGN=left>'My Friend'</TD>
</TR>
</TABLE>