Clean useless fonction for age

Check.pm

@@ -52,11 +52,9 @@ sub action
         }
 
         # Age
-        for ( my $i = 0 ; $i < @Backups ; $i++ ) {
         if ( $Backups[$i]{type} eq "full" or "incr" ) {
             $lastAge = sprintf("%.1f", (time - $Backups[-1]{startTime}) / (24 * 3600));
         }
-        }
 
         # Color for age
         if ( $lastAge < $frequency ) {
@@ -64,17 +62,7 @@ sub action
         } else {
           $lastAgeColor = "Tomato";
         }
-        if ( $fullAge < 0 ) {
-            $fullAge = 0;
-        } else {
-            $fullAge = sprintf("%.1f", (time - $fullAge) / (24 * 3600));
-        }
-        if ( $incrAge < 0 ) {
-            $incrAge = 0;
-        } else {
-            $incrAge = sprintf("%.1f", (time - $incrAge) / (24 * 3600));
-        }
-        $incrAge = "&nbsp;" if ( $incrAge eq "" );
+
         # Color for errors
         $lastXferErrors = $Backups[@Backups-1]{xferErrs} if ( @Backups );
         if ( $lastXferErrors == 0 ) {