Parallel-Pvm

 view release on metacpan or  search on metacpan

Pvm.pm  view on Meta::CPAN

   PvmTaskExit PvmTaskHost PvmTaskSelf PvmTaskTrace PvmTraceCode
   PvmTraceTid PvmMboxDefault PvmMboxPersistent PvmMboxMultiInstance 
   PvmMboxOverWritable PvmMboxFirstAvail PvmMboxReadAndDelete
);

# Theese are the badd ones:
#     send pack unpack exit recv kill 
@EXPORT_OK = qw
  (

   spawn initsend psend mcast sendsig probe nrecv trecv precv parent
   mytid halt catchout tasks config addhosts delhosts bufinfo freebuf
   getrbuf getsbuf mkbuf setrbuf setsbuf mstat pstat tidtohost getopt
   setopt reg_hoster reg_tasker reg_rm perror notify recv_notify
   hostsync recvf recvf_old

   joingroup lvgroup bcast freezegroup barrier getinst gettid gsize

   siblings

   getcontext newcontext setcontext freecontext

Pvm.pm  view on Meta::CPAN

Send the data in the active message buffer.  Eg.  

	# Parallel::Pvm::send(-1,-1);
	$info = Parallel::Pvm::send ;

	# Parallel::Pvm::send($tid,-1);
	$info = Parallel::Pvm::send($tid);

	$info = Parallel::Pvm::send($tid,$tag);

=item B<Parallel::Pvm::sendsig>

Sends a signal to another PVM process.  Eg.

	use POSIX qw(:signal_h);
	...

	$info = Parallel::Pvm::sendsig($tid,SIGKILL);

=item B<Parallel::Pvm::setopt>

Sets various libpvm options.  Eg.

	$oldval=Parallel::Pvm::setopt(PvmOutputTid,$val);

	$oldval=Parallel::Pvm::setopt(PvmRoute,PvmRouteDirect);

=item B<Parallel::Pvm::setrbuf> 

Pvm.xs  view on Meta::CPAN

    tids[i] = SvIV(ST(i));
  }
  proc_num = tag_num = items-1;
  tag = SvIV(ST(tag_num));
  RETVAL = pvm_mcast(tids,proc_num,tag);
  OUTPUT:
  RETVAL


int
pvm_sendsig(tid,sig)
  int	tid
  int	sig

int
pvm_probe(tid=-1,tag=-1)
  int	tid
  int	tag

int
pvm_recv(tid=-1,tag=-1)



( run in 0.961 second using v1.01-cache-2.11-cpan-71847e10f99 )