files löschen
am 14.11.2006 10:50:48 von Ahmed HarouriHallo zusammen,
ich möchte gerne in einem Directory Dateien löschen, die nicht
allockiert von einem Prozess (fuser raus finden. wie kann ich das
realisieren? sollte es so ausehen:
Der input aus ls -ltr soll in @files eingetragen werden und dann die
Files nach und nach bearbeiten
z.B.
fuser file1.txt
wenn kein Prozess drauf schreibt dann
rm file1.txt
.....
ich habe eine kleine Script geschrieben aber mir fehlt, wie ich fuser
und ls -ltr im Script einbaue:(
----------Script Begin ---------
#!/usr/bin/perl
print "offredologs löschen \n\n";
@files = ("file1.txt","file2.txt","file3.txt", "file4.txt ...");
foreach $file (@files)
{
sleep(5);
unlink($file);
if (unlink($file) == 0)
{
print "File deleted successfully.\n";
} else {
print "File was not deleted.";
}
}
----------Script Ende ---------
Danke im Voraus
Harouri
--
Posted via Mailgate.ORG Server - http://www.Mailgate.ORG