Help for this page
mkdir ("$user_name",0777) || die "cannot mkdir : $!";
mkdir ($user_name, 0777) || warn "directory $! already exists";