is_stateful

message

out my @fh; my @mem; while(1) { for(1..20) { open my $fh, '<', 'thing.out'; push @fh, $fh; IPC::Transit::send(qname => 'test', message => { junk => 'hsddddddddddddddddddddddddddddddddddd' }); } push @mem, 'h' x (1024 * 1024) for (1..300); print 'scalar @fh=' . scalar @fh . "\n"; local $SIG{ALRM} = sub { die "timed out\n"; }; alarm 1; my $ct = 0; eval { while(1) { $ct++; } }; sleep 1; }

oob_testing