Opened by Optalamia at 2005-10-16 19:23
User since
2005-02-18
357 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2005-02-18
357 Artikel
BenutzerIn
Siehe
perldoc Win32::ChangeNotify
Bzw.
perldoc Win32::IPC (ChangeNotify erbt Methode "wait" von IPC)
Code(-Ausschnitt) den ich vor Jahren mal benutzt hab, um in einer (Endlos-)Schleife auf Änderungen zu warten(diese zu verarbeiten).
Die sub ersetzt quasi ein sleep, was aber unterbrochen wird, wenn ein Ereignis eintritt.
Das Ergebnis von "wait" kann auch abgefragt werden (interessierte mich damals nicht, da ich angelieferten Dateien sowieso alle gelöscht habe), siehe Win32::IPC
perldoc Win32::ChangeNotify
Bzw.
perldoc Win32::IPC (ChangeNotify erbt Methode "wait" von IPC)
Code(-Ausschnitt) den ich vor Jahren mal benutzt hab, um in einer (Endlos-)Schleife auf Änderungen zu warten(diese zu verarbeiten).
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
use Win32::ChangeNotify;
my $PathConfig = "C:\\SCRIPT\\Config";
my $FileChangeStr = 'LAST_WRITE|FILE_NAME|SIZE';
my $oNotifyConfig = Win32::ChangeNotify->new($PathConfig, 0, $FileChangeStr);
sub snooze {
my $timeout = shift;
$timeout *= 1000;
$oNotifyConfig->wait($timeout);
$oNotifyConfig->reset();
}
Die sub ersetzt quasi ein sleep, was aber unterbrochen wird, wenn ein Ereignis eintritt.
Das Ergebnis von "wait" kann auch abgefragt werden (interessierte mich damals nicht, da ich angelieferten Dateien sowieso alle gelöscht habe), siehe Win32::IPC
I sense a soul in search of answers.