Wie kann ich mich bei einer FTP-Site anmelden und Dateien entfernen, die älter als 7 Tage sind?

Question

Ich brauche ein Shell- oder Perl-Skript, das eine Verbindung zum FTP-Server herstellen und alle Dateien löschen würde, die älter als 7 Tage sind.

prost

Answer 1

In Perl, dann würden Sie Net::FTP ‚s ls, mdtm und löschen Befehle verwenden möchten.

Answer 2

Verwenden Sie das Modul Net::FTP, um eine Verbindung zum FTP-Server herzustellen, wie im CPAN-Dokument beschrieben. Um die Site-Einträge zu durchsuchen, müssen Sie cwd/cdup kombinieren, um Verzeichnisse zu verwalten (es sei denn, alle Dateien befinden sich im Stammverzeichnis).

Um die Dateiänderungszeit verwenden, um die mdtm (FILE) Methode, so stellen Sie sicher, zu überprüfen, wenn dieser

durch den Aufruf auf dem aktuellen Server unterstützt wird

if($ftp->feature('MDTM')) { 
    ...check modification time for file... 
} 

Wenn nicht, dann können Sie versuchen, rufen die 'dir' Methode, die Sie die Auflistungen im langen Format erhalten und dann die Datumsinformationen aus den einzelnen Dateiauflistungen extrahieren, um zu vergleichen und zu löschen.

Um die beiden Daten zu vergleichen, verwenden Sie das Modul Date::Calc. Die 'Delta_Days' Methode sollte Ihnen die Anzahl der Tage zwischen zwei Daten geben; Dies kann genauso einfach für jede der oben angegebenen Methoden verwendet werden.

Answer 3

Wenn es sich um ein Shell-Skript handelt, ist es besser, ein Skript in einer Crontab auszuführen.

find /tmp -type f -mtime +7 -exec rm {} \;