From: Eric Hodel <drbrain@...7.net>
Date: 2007-12-13T09:22:27+09:00
Subject: warning: variable $KCODE is no longer effective

This warning comes from accessing $KCODE.  What should be used instead?

In particular, this snippet from RDoc:

> @charset = case $KCODE
>            when /^S/i
>              'Shift_JIS'
>            when /^E/i
>              'EUC-JP'
>            else
>              'iso-8859-1'
>            end

Eventually @charset is placed in a <meta http-equiv> in the output  
RDoc.  Is there a better way to determine the charset of a file?