#!/usr/local/bin/perl
require "cgi-lib.pl";
require "jcode.pl";
&ReadParese

$you = $in{"you"};

&jcode'convert(*you,"euc");

print "Content-type: text/html\n\n";
print "<HTML>\n<HEAD>\n<TITLE>you name is ... </TITLE>\n</HEAD>\n<BODY>\n";

print "あなたは";
print $you;
print "さんですね\n";
print "</BODY>\n</HTML>\n";


ーーーーーーーーーーーーーーーーーーーーーーーーー

$you = $in{"you"};


この部分がエラーが出てしまい動きません（涙
本の記述どおりに記入して、スペルミス等は
一切ないのですが、どなたかご教授お願い致します。