On Dec 19, 2007, at 4:41 AM, Otheus (aka Timothy J. Shelling) wrote:

if (!defined $description->logfile())
{
    $description->logfile("/tmp/jobmanager- sge.log");
}

I'm not sure I see why this should work as an assignment statement. Why don't you just steal the code from the super's new and do something like:

        local(*FH);
        open(FH, '>>'. "/tmp/jobmanager-sge.log");
        select((select(FH),$|=1)[$[]);
        $self->{log} = *FH;


Charles

Reply via email to