package SWCmdProfile;

#----------------------------------------
# ユーザー情報表示
#----------------------------------------
sub CmdProfile {
	my $sow = $_[0];
	my $cfg = $sow->{'cfg'};
	require "$cfg->{'DIR_HTML'}/html.pl";
	require "$cfg->{'DIR_HTML'}/html_profile.pl";

	# ユーザー情報のHTML出力
	&SWHtmlProfile::OutHTMLProfile($sow);
}

1;