<%
if($var{error} and @{ $var{error} }) { %>
エラー
記入されたデータに以下のエラーが見つかりました。
エラーのある箇所を訂正してください。
<%
my $value;
foreach my $e (@{ $var{error} }) {
$value = $e->{name} eq 'passwd' ? '******' : $col->{ $e->{name} };
$value = "― $value" if($value ne '');
print "- $e->{print} $value
\n", "- $e->{msg}
\n";
} %>
<%
}
%>
下記のフォームに記入して、「確認画面へ」
のボタンを押してください。
ユーザ名とパスワードは、
半角英数字またはアンダースコアで3文字以上10文字以内で記入してください。