BEGIN {
    # install JSON and JSON::XS if you can!
    eval 'use JSON -convert_blessed_universally;';
    eval ( $@ ? 'sub HAS_JSON(){ 0 }' : 'sub HAS_JSON(){ 1 }' );
}