check if defined

diff --git a/Usermgm.pm b/Usermgm.pm
index 74793a0610387897626738274cf5123e95b522e2..6e0a05037b5e85184a139ad97ae04f0ab0b177ef 100644 (file)
--- a/Usermgm.pm
+++ b/Usermgm.pm
@@ -263,7 +263,7 @@ sub setPNick {
        my ($msg, $command) = @_;
 
        my ($nick, $pnick);
-       if($msg =~ /^(\S+) ([^.\s]+)$/){
+       if(defined $msg && $msg =~ /^(\S+) ([^.\s]+)$/){
                $nick = $1;
                $pnick = $2;
        }else{