#!/bin/rc q=$QUERY_STRING if(! ~ $q jis sjis ujis utf){ echo invalid query: $q exit error } # tcs values jis=jis-kanji ujis=ujis sjis=ms-kanji utf=utf # ? # mime valuse Mjis=ISO-2022-JP Mujis=x-euc-jp Msjis=Shift-JIS Mutf=UTF-8 # ? echo ' japanese code test

Japanese Code Test

' tcs -t $$q < utf8.txt echo ' '