Changeset 33451
- Timestamp:
- 2019-09-03T12:55:13+12:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/sorttools.pm
r18902 r33451 78 78 $$stringref =~ s/&[^\;]+\;//g; # html entities 79 79 $$stringref =~ s/^\s*(the|a|an)\b//; # articles 80 $$stringref =~ s/[^[:alnum:]]//g; 80 $$stringref =~ s/[^[:alnum:]]//g; # remove any non-alphanumeric chars from start of the string 81 81 $$stringref =~ s/\s+/ /g; 82 82 $$stringref =~ s/^\s+//;
Note:
See TracChangeset
for help on using the changeset viewer.