]> git.donarmstrong.com Git - perltidy.git/blobdiff - t/snippets18.t
New upstream version 20220217
[perltidy.git] / t / snippets18.t
index 67ca2647ab45b9fc710d1843759491ded97a8272..2dec3547ce344baf570d0c6004e5a76eda4bc69d 100644 (file)
@@ -609,8 +609,7 @@ Mojo::IOLoop->next_tick(
 );
 
 $r = do
-  { sswitch( $words[ rand @words ] )
-    {
+  { sswitch( $words[ rand @words ] ) {
         case $words[0]:
         case $words[1]:
         case $words[2]:
@@ -619,12 +618,10 @@ $r = do
     }
   };
 
-try
-{
+try {
     die;
 }
-catch
-{
+catch {
     die;
 };
 #7...........