Changeset 27502


Ignore:
Timestamp:
05/28/13 14:02:00 (8 years ago)
Author:
kjdon
Message:

trying to fix double encoding issue for isis files. not sure that I have it yet

File:
1 edited

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/plugins/ISISPlugin.pm

    r24547 r27502  
    2727package ISISPlugin;
    2828
     29use Encode;
    2930
    3031use multiread;
     
    201202    $reader->read_file($textref);
    202203
     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);
    203211    close(FILE);
    204212
Note: See TracChangeset for help on using the changeset viewer.