sistemazione partizioni
This commit is contained in:
@@ -107,7 +107,7 @@ sub aggiorna {
|
||||
|
||||
next if ($1 eq '19700101');
|
||||
my ($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = localtime($2);
|
||||
$ultimo = $year+1900."-".$mon+1."-".$mday;
|
||||
$ultimo = ($year+1900)."-".i($mon+1)."-".$mday;
|
||||
my $diff = diffgg ($ultimo);
|
||||
|
||||
if ($diff > 365) {
|
||||
|
||||
Reference in New Issue
Block a user