Minor changes in unit tests

Author: iph0

t/10-exceptions.t

@@ -152,55 +152,55 @@ sub t_not_allowed_after_multi {
     exception {
       $redis->subscribe('channel');
     },
-    qr/Command "subscribe" not allowed after "multi" command\./,
+    qr/Command "subscribe" not allowed after "multi" command/,
     "not allowed after multi; SUBSCRIBE",
   );
 
   like(
     exception {
       $redis->unsubscribe('channel');
     },
-    qr/Command "unsubscribe" not allowed after "multi" command\./,
+    qr/Command "unsubscribe" not allowed after "multi" command/,
     "not allowed after multi; UNSUBSCRIBE",
   );
 
   like(
     exception {
       $redis->psubscribe('pattern_*');
     },
-    qr/Command "psubscribe" not allowed after "multi" command\./,
+    qr/Command "psubscribe" not allowed after "multi" command/,
     "not allowed after multi; PSUBSCRIBE",
   );
 
   like(
     exception {
       $redis->punsubscribe('pattern_*');
     },
-    qr/Command "punsubscribe" not allowed after "multi" command\./,
+    qr/Command "punsubscribe" not allowed after "multi" command/,
     "not allowed after multi; PUNSUBSCRIBE",
   );
 
   like(
     exception {
       $redis->info;
     },
-    qr/Command "info" not allowed after "multi" command\./,
+    qr/Command "info" not allowed after "multi" command/,
     "not allowed after multi; INFO",
   );
 
   like(
     exception {
       $redis->select(2);
     },
-    qr/Command "select" not allowed after "multi" command\./,
+    qr/Command "select" not allowed after "multi" command/,
     "not allowed after multi; SELECT",
   );
 
   like(
     exception {
       $redis->quit;
     },
-    qr/Command "quit" not allowed after "multi" command\./,
+    qr/Command "quit" not allowed after "multi" command/,
     "not allowed after multi; QUIT",
   );