push @parms, $key . '=' . $val;
}
# Add user and group to prevent warn from Net::Server.
push @parms, 'user=' . $>;
push @parms, 'group=' . $>;
#
# This is the main event.
-