Simplify lastAge

Check.pm

@@ -33,11 +33,10 @@ sub action
 
     # Start loop
     foreach my $host ( GetUserHosts(1) ) {
-        my($incrCnt, $incrAge, $reasonHilite, $frequency, $lastAge, $lastAgeColor, $tempState, $tempReason, $lastXferErrors, $lastXferErrorsColor);
+        my($incrAge, $reasonHilite, $frequency, $lastAge, $lastAgeColor, $tempState, $tempReason, $lastXferErrors, $lastXferErrorsColor);
         my($shortErr);
         my $bpc = BackupPC::Lib->new();
         my @Backups = $bpc->BackupInfoRead($host);
-        my $fullCnt = $incrCnt = 0;
         my $fullAge = $incrAge = $lastAge = -1;
 
         $bpc->ConfigRead($host);
@@ -55,28 +54,10 @@ sub action
 
         # Age
         for ( my $i = 0 ; $i < @Backups ; $i++ ) {
-            if ( $Backups[$i]{type} eq "full" ) {
-                $fullCnt++;
-                if ( $fullAge < 0 || $Backups[$i]{startTime} > $fullAge ) {
-                    $fullAge  = $Backups[$i]{startTime};
-                }
-            } elsif ( $Backups[$i]{type} eq "incr" ) {
-                $incrCnt++;
-                if ( $incrAge < 0 || $Backups[$i]{startTime} > $incrAge ) {
-                    $incrAge = $Backups[$i]{startTime};
-                }
+            if ( $Backups[$i]{type} eq "full" or eq "incr" ) {
+                $lastAge = $Backups[-1]{startTime};
             }
         }
-        if ( $fullAge > $incrAge && $fullAge >= 0 )  {
-            $lastAge = $fullAge;
-        } else {
-            $lastAge = $incrAge;
-        }
-        if ( $lastAge < 0 ) {
-            $lastAge = 0;
-        } else {
-            $lastAge = sprintf("%.1f", (time - $lastAge) / (24 * 3600));
-        }
 
         # Color for age
         if ( $lastAge < $frequency ) {