flock bei tie

[Martin M.]

hallo

ich moechte mit tie::file zuerst eine datei oeffnen dann sperren und dann dort bestimmte aktionen durchfuehren und schliessen.
problem: wie sperrt man eine mit tie::file geoeffnete datei?

nachdem ich gegoogelt habe sind mir zwei methoden ueber den weg gelaufen

1.
        my $o = tie @array, "Tie::File", $filename;
        $o->flock;

hier zu sehen: http://search.cpan.org/~mjd/Tie-File-0.96/lib/Tie/File.pm#flock
bei dieser methode oeffnet es bei mir aber nicht die datei und ich kann nichts.

2.
  tie @array, "Tie::File", $filename;
  (tied @array)->flock(LOCK_EX);

das "geht" zwar ohne probleme aber ich weiss nicht ob meine datei dadurch wirklich gesperrt ist denn meine tests sagten das die datei nicht gesperrt ist.

wie sperrt man nun mit tie::file eine datei richtig?

danke mfg

[Struppi]

das "geht" zwar ohne probleme aber ich weiss nicht ob meine datei dadurch wirklich gesperrt ist denn meine tests sagten das die datei nicht gesperrt ist.

Also ich hab mal die erste Methode mit Tie::File getestet und sehe, dass die Datei gesperrt ist.

Struppi.