my($user, $input) = @_; # name of person issuing ban, and person being banned
    my(@parse) = split(/\s/, $input);
    my($target, $reason) = (shift(@parse), join(" ", @parse));