file in use - #144603 (Allgemeines zu Perl)

topeg

2011-01-12 13:16

User since
2006-07-10
2611 Artikel
BenutzerIn

user image

Für so was wurde "lsof" geschrieben. Es findet die Prozesse die eine Datei geöffnet haben. (kann noch viel mehr, aber das ist hier ja nicht interessant)

mal ganz kurz:

Code (perl): (dl )

my $file='/tmp/test.txt';
if(system(qq(lsof '$file' > /dev/null))==0)
{
  print "File $file opend!\n";
}
else
{
  print "File $file closed!\n";
}