07/01/11 01:54:59
>>304
一度も動かしてないからだめかも。
&jcode'h2z_sjis(\$name);
↓
if ($name =~ /\A(?:name|com|sub)\z/) {
$tmp = $value;
&jcode'h2z_sjis(*value);
if ($name ne 'name' && $tmp ne $value) {
&error('半角カナが含まれているらしい。');
}
}
07/01/11 01:54:59
>>304
一度も動かしてないからだめかも。
&jcode'h2z_sjis(\$name);
↓
if ($name =~ /\A(?:name|com|sub)\z/) {
$tmp = $value;
&jcode'h2z_sjis(*value);
if ($name ne 'name' && $tmp ne $value) {
&error('半角カナが含まれているらしい。');
}
}