print "Don't know how to '/m$1', maybe you meant /me or /msg?\n" if $line =~ m#^\s*/m(\w*)# and $1 !~ m#^(e|sg)$#;