I am trying to use the Thread module but I get the following error:
Can't locate Thread.pm in @INC (@INC contains:
/usr/lib/perl5/5.6.1/i386-linux /usr/lib/perl5/5.6.1
/usr/lib/perl5/site_perl/5.6.1/i386-linux /usr/lib/perl5/site_perl/5.6.1
/usr/lib/perl5/site_perl/5.6.0 /usr/lib/perl5/site_perl
/usr/lib/perl5/vendor_perl/5.6.1/i386-linux /usr/lib/perl5/vendor_perl/5.6.1
/usr/lib/perl5/vendor_perl .) at thread.pl line 3.
BEGIN failed--compilation aborted at thread.pl line 3.
I tried to install from CPAN but it says that I already have it installed.
The code I am using is just some sample code from Programming Perl:
#!/usr/bin/perl
use Thread qw/async yield/;
my $done = 0;
my @t;
for my $i (1..3){
push @t, Thread->new(\&frob,$i);
}
for (@t){$_->join}
print "done is $done\n";
sub frob{
my $arg = shift;
my $tid=Thread->self->tid;
print "thread $tid: frob $arg\n";
yield;
unless ($done) {
yield;
$done++;
frob($arg + 10);
}
}
Any ideals what might be happening? I know the above code won't work
properly in the end result but I am trying to learn this by trying out the
examples. Also, isn't there a command you can issue that will show you all
the modules currently installed on your system? I am running this on Redhat
7.3 Linux - the version of Perl is something I can't recall atm and for the
life of me can't remember the easy way to get the version but it should be
fairly recent (not version 6 though, I know that much). Thanks!
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
