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