in reply to Re: Runing "regular" code with threaded perl
in thread Runing "regular" code with threaded perl

Whatever your problem is, threading support has nothing to do with it.

I agree. And I think that the bugs was present before, and only revealed by switching to a system with real concurrency (better operating system, multi core processor or both).

  • Comment on Re^2: Runing "regular" code with threaded perl

Replies are listed 'Best First'.
Re^3: Runing "regular" code with threaded perl
by kingskot (Sexton) on Jul 10, 2008 at 08:05 UTC
    I do not "use threads" in my code. Whether it makes sense or not (it certainly doesn't to me), the fact is that this works:

    system("xspec - ${tmp}.xcm");

    open(DAT, "${tmp}xsfit.dat") || die ("Could not open file!");

    whereas this does not:

    bjmsys("xspec - ${tmp}.xcm", $v);

    open(DAT, "${tmp}xsfit.dat") || die ("Could not open file!");

    where------------

    sub bjmsys {

    my $arg=shift;

    my $v=shift;

    $v=0 unless defined $v;

    my $status;

    print "$arg\n" if $v>1||$v<0;

    $status=system("$arg");

    print "return status = $status\n" if $v>1;

    return $status;

    }
[reply]
      Curious. What do you mean with "it doesn't work"? Does it die with "Could not open file"?
      []s, HTH, Massa
[reply]

In Section Seekers of Perl Wisdom