MobileRead Forums - View Single Post

Sarmat89 · 10-02-2022, 05:41 AM

Code:

perl -pe 's/^$/%%/sg' < djvu1txt.txt | perl -pe 's/\n/ /sg' | perl -pe 's/%%/\n/sg' | perl -pe "s:^ +::" | perl -pe "s:^([^[]+?) *(?=\[):\1\t:" > new.tsv

But again, the text quality is low and it requires manual correction to obtain useful results.

10-02-2022, 05:41 AM	#127
Sarmat89 Fanatic Posts: 515 Karma: 2268308 Join Date: Nov 2015 Device: none	Code: perl -pe 's/^$/%%/sg' < djvu1txt.txt \| perl -pe 's/\n/ /sg' \| perl -pe 's/%%/\n/sg' \| perl -pe "s:^ +::" \| perl -pe "s:^([^[]+?) *(?=\[):\1\t:" > new.tsv But again, the text quality is low and it requires manual correction to obtain useful results.