Help for this page

Select Code to Download

Select or download this

use threads;
use threads::shared;
my $rw = 0;
cond_signal $rw;