Remove leading and trailing spaces and tabs

This commit is contained in:
Richard Levitte 2003-10-01 15:04:15 +00:00
parent 1a9e663b20
commit a510e9e4fc

View file

@ -10,6 +10,8 @@ while(<STDIN>) {
if (/ - /) {
s/ - .*//;
s/,[ \t]+/,/g;
s/^[ \t]+//g;
s/[ \t]+$//g;
push @words, split ',';
}
}