Use ctime instead of mtime to compare

HTTP::Tiny sets mtime to "Last Modified" time set by the server. ctime
is set as the time when that file gets created on disk so we use that
to compare now, actually this should've been used from the start but
File::Fetch didn't set mtime differently (?) so mtime worked till we
used File::Fetch.

1 files changed, 3 insertions, 3 deletions

diff --git a/ara.pl b/ara.pl
index a351eb6..93656a4 100755
--- a/ara.pl
+++ b/ara.pl
@@ -61,12 +61,12 @@ foreach my $path ( sort keys %unveil ) {
 }
 
 my $file = '/tmp/data.json';
-my $file_mtime;
+my $file_ctime;
 
 # If $file exists then get mtime.
 if ( -e $file ) {
     my $file_stat = path($file)->stat;
-    $file_mtime = Time::Moment->from_epoch( $file_stat->[9] );
+    $file_ctime = Time::Moment->from_epoch( $file_stat->[10] );
 } else {
     warn "File '$file' doesn't exist\nFetching latest...\n"
         if $use_local_file;
@@ -75,7 +75,7 @@ if ( -e $file ) {
 # Fetch latest data only if the local data is older than 8 minutes or
 # if the file doesn't exist.
 if ( not -e $file
-         or $file_mtime < Time::Moment->now_utc->minus_minutes(8)
+         or $file_ctime < Time::Moment->now_utc->minus_minutes(8)
          or $get_latest ) {
     require HTTP::Tiny;