Changeset 27502
- Timestamp:
- 2013-05-28T14:02:00+12:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/ISISPlugin.pm
r24547 r27502 27 27 package ISISPlugin; 28 28 29 use Encode; 29 30 30 31 use multiread; … … 201 202 $reader->read_file($textref); 202 203 204 # At this point $$textref is a binary byte string 205 # => turn it into a Unicode aware string, so full 206 # Unicode aware pattern matching can be used. 207 # For instance: 's/\x{0101}//g' or '[[:upper:]]' 208 # 209 210 $$textref = decode("utf8",$$textref); 203 211 close(FILE); 204 212
Note:
See TracChangeset
for help on using the changeset viewer.