Interpunkcja ze spacjami

Drażni mnie jak niektórzy wstawiają spacje przed niektórymi znakami interpunkcyjnymi. Co oczywiście nie jest zgodne z zasadami gramatyki, semantyki, czy czegoś tam, w języku polskim i nie tylko.

W pewnym projekcie, w którym obecnie pracuję, tłumacze właśnie mają małe zboczenie do wstawiania spacji przed “!” i innymi znakami. A zapewne kolegom deweloperom nie będzie się uśmiechała ręczna edycja plików.

Dlatego “machnąłem” prościutki skrypcik w Perlu ;)

#!/usr/bin/perl -pi.bak
BEGIN { @ARGV or print "\nusage: ./clean.pl filename\n\n" and exit; }
$c += s/\s+([,.!?:;])/$1/g;
END { print "Fixed: $c"; }

Oczywiście skrypt przed akcją tworzy backupa.

Może komuś się również przyda ;)