Bug 6679: Fix 3 perlcritic violations in C4/Record.pm

Expression form of "eval" at line 358, column 5.  See page 161 of PBP.  (Severity: 5)
Expression form of "eval" at line 367, column 5.  See page 161 of PBP.  (Severity: 5)
Expression form of "eval" at line 510, column 3.  See page 161 of PBP.  (Severity: 5)

Signed-off-by: Jonathan Druart <jonathan.druart@biblibre.com>
Signed-off-by: Bernardo Gonzalez Kriegel <bgkriegel@gmail.com>
Fixed conflict

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>

C4/Record.pm

@@ -379,7 +379,7 @@ sub marc2csv {
     }
 
     # Preprocessing
-    eval $preprocess if ($preprocess);
+    eval {$preprocess} if ($preprocess);
 
     my $firstpass = 1;
     if ( @$itemnumbers ) {
@@ -396,7 +396,7 @@ sub marc2csv {
     }
 
     # Postprocessing
-    eval $postprocess if ($postprocess);
+    eval {$postprocess} if ($postprocess);
 
     return $output;
 }
@@ -575,7 +575,7 @@ sub marcrecord2csv {
                         # Field processing
                         my $marcfield = $tag->{fieldtag}; # This line fixes a retrocompatibility concern
                                                           # The "processing" could be based on the $marcfield variable.
-                        eval $fieldprocessing if ($fieldprocessing);
+                        eval {$fieldprocessing} if ($fieldprocessing);
 
                         push @loop_values, $value;
                     }