Hi,
trying to work with the a.m. Job-Server I found some bugs that I've replaced:
(hope you don't mind)
1) the 1st Line I eliminated the '-':
from #!/usr/bin/perl -
to #!/usr/bin/perl
because I never thought of that, it took my 1 hour to find out why nothing
happens :-/
2) I replaced the apparently depricated Filter:
Filter => POE::Filter::Line->new(),
into:
StdioFilter => POE::Filter::Line->new(),
StderrFilter => POE::Filter::Line->new(),
I think this is ok?
But here may be that you better know what and where to change:
3) The program that was started by the Job_Server was NOT killed (when the
Client disconnects). In my program I added:
system('kill', $heap->{job}->PID)
But I assume there are more elegant ways t do that, deep in the source.
4) If the Client just disconnects the Server allways writes:
Client session 3 got read error 0 (Normal disconnection)
I think, if it is a 'Normal disconnection' it is not woth to mention.
Regards,
carl
