Thread Wie kann ich das Datum verschiedener Files vergleichen? (13 answers)
Opened by guest mo at 2017-04-27 16:01

rosti
 2017-04-27 18:21
#186395 #186395
User since
2011-03-19
3219 Artikel
BenutzerIn
[Homepage]
user image
stat() ist die richtige Funktion. Schöner als ein Array jedoch ist ein Hash, das macht den Code besser lesbar und die Werte sind namentlich ansprechbar:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10

print Dumper hstat($0);

# Namen statt Index
sub hstat{
    my $file = shift;
    my @names = qw(dev ino mode nlink uid gid redv size atime mtime ctime blksize blocks);
    my %h = ();
    @h{@names} = stat $file;
    return \%h;
}


Ergebnis:

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
$VAR1 = {
          'atime' => 1493309871,
          'blksize' => '',
          'blocks' => '',
          'ctime' => 1367948039,
          'dev' => 2,
          'gid' => 0,
          'ino' => 0,
          'mode' => 33206,
          'mtime' => 1493309871,
          'nlink' => 1,
          'redv' => 2,
          'size' => '3141',
          'uid' => 0
        };



PS: Also die Anwendung sieht dann so aus:

Code (perl): (dl )
1
2
3
4
5
6

   my $mtime = hstat($file)->{mtime};
   my $atime = hstat($file)->{atime};

   if( hstat( $file_1 )->{ctime} == hstat( $file_2 )->{ctime} ) {
      print "Die Dateien wurden zu selben Zeit erstellt";
   }

Last edited: 2017-04-27 18:32:24 +0200 (CEST)

View full thread Wie kann ich das Datum verschiedener Files vergleichen?