3 ms·
You could save the page, paste the following into a file and run "perl file savedpage.html > fixedpage.html" and open that instead. I'm sure a Javascript progr
by pflanze 13y ago
You could save the page, paste the following into a file and run "perl file savedpage.html > fixedpage.html" and open that instead.
I'm sure a Javascript programmer would come up with some better solution instead?...
local $/;
$_= <>;
s/<(.*?)>/$id++; $t{$id}=$1; "<$id>"/sge;
s/([.?!][^\w].*?)([a-zA-Z])/$1.uc($2)/sge;
s/<(.*?)>/"<$t{$1}>"/sge;
s/(<[pP]\b[^>]*>\s*)([a-z])/$1.uc($2)/sge;
print;
Edit: changed \. to [.?!] in line 4.