Select Code to Download

[ ~/tmp ] $ perl pg_filevent 
Start to listen ...
...
callback triggered
callback triggered
callback triggered

[ ~/tmp ] $ perl pg_filevent 
Start to listen ...
...
3callback triggered
After read
4[ ~/tmp ] $

[ ~/tmp ] $ perl pg_filevent 
Start to listen ...
...
9callback triggered
After read
10