#package utf8;

package _unicode_handling;

# this is a dummy pragma for 5.005.

    if ($] < 5.006) {

        $INC{'utf8.pm'} = './utf8.pm';

        eval q|

            sub utf8::import {  }

            sub utf8::unimport {  }

        |;

        $JSON::can_handle_UTF16_and_utf8 = 0;

    }

    else {

        $JSON::can_handle_UTF16_and_utf8 = 1;

        if ($] > 5.007 and $] < 5.008003) {

#            $JSON::can_handle_UTF16_and_utf8 = 0;

        }

    }

1;