![]() |
|
|
Google unix.com
|
|||||||
| Foren | Registrieren | Forum-Regeln | Links | Alben | FAQ | Benutzerliste | Kalender | Suche | Die heutige Beiträge | Alle Foren als gelesen markieren |
| Shell Programmierung und Scripting Post Fragen zu ksh, csh, sh, bash, Perl, PHP, sed, awk und anderen Shell-Skripte und Shell-Scripting-Sprachen hier. |
Mehr UNIX-und Linux-Forum Themen Vielleicht finden Sie hilfreiche
|
||||
| Faden | Thread Starter | Forum | Antworten | Last Post |
| Aktive Fenster, wenn darauf. | rimser9 | UNIX-Desktop für Dummies Fragen & Antworten | 1 | 07-14-2008 04:07 PM |
| Suchen / Ersetzen die neue Datei: ksh -> perl | McLan | Shell Programmierung und Scripting | 1 | 05-16-2008 04:14 AM |
| perl - Wie finde ich heraus, ob eine Datei nicht enthalten ein Muster? | mjays | Shell Programmierung und Scripting | 4 | 09-19-2007 07:28 AM |
| Anschließen von Solaris 9 auf Windows Active Directory | morphous | SUN Solaris | 0 | 03-28-2006 06:15 PM |
| Wie zu vereinen, RedHat 9 Linux mit Windows 2003 Active Directory-Authentifizierung | solaris8in | Linux | 0 | 11-28-2005 08:53 AM |
![]() |
|
|
LinkBack | Thread Tools | Suche diesen Thread | Rate Thread | Anzeige-Modi |
|
|
|
||||
|
So finden Sie 1 Tag alte Datei unter Windows für Aktive Perl?
Gibt es jemand wissen, welche Methode? Wenn Unix-oder Linux, wir können mit dem "finden ...". Wie wir uns für Windows? |
|
||||
|
Wenn Sie auf Start -> Sie (oder suchen, wenn es XP) können Sie die erweiterte Suche und die angeben, x Tage.
Wenn Sie tring zu tun, es durch Perl, Aus der Orielly lernen Perl: "Die Perl Betreiber-M liefert das Alter in Tagen, da eine Datei oder ein FileHandle zuletzt geändert worden " |
|
||||
|
Sorry für die Verwirrung.
Wenn wir Perl läuft unter UNIX, können wir die folgenden Befehl aus, um die Suche eines Tages die alte Datei. @ Dateien \u003d qx / finden. -name '*'-mtime -1-print /; Das Problem, das ich bin, die ich jetzt versuchen, das Gleiche zu tun, sondern unter Windows-Plattform durch Active Perl (Fenster-basiert). Ich habe versucht mit Hilfe von Windows, aber es scheint, das Skript wird sehr lange, denn Sie brauchen, um das Datum, an dem geänderten Datei und vergleichen Sie das Datum mit Datum. Gibt es andere Lösungen? Es ist viel besser, wenn ich kann 1 Zeile der Befehl wie UNIX (z. B. finden) auf das Fenster auf der Grundlage Perl. Danke. ![]() |
|
|||||
|
Ich habe einen kleinen perl Skript .. sehen, ob es für Sie: Code:
#!C:\Perl\bin\perl.exe
use File::Find;
my @oldFiles;
print "Content-type: text/html\n\n";
find(\&cleanup, "C:\/WINDOWS/Temp/");
sub cleanup {
my $daysOld = ((time - +(stat($_))[9]) / 86400);
if (/\./ && $daysOld >= 1 && $daysOld < 2) {
push(@oldFiles, $File::Find::name);
}
}
print @oldFiles;
Wenn Sie möchten, dass die Suche eine ganze Festplatte ersetzen C: \ / windows / Temp / mit C: \ \ Referenzen: http://techupdate.zdnet.co.uk/story/...122110, 00.html http://techupdate.zdnet.co.uk/i/z/tu...inga110902.htm http://www.xav.com/perl/lib/Pod/perlfunc.html # item_stat |
![]() |
| Lesezeichen |
| Thread Tools | Suche diesen Thread |
| Anzeige-Modi | Rate this thread |
|
|