Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
    
    use strict;
    ...
    # Terminate - signal $queue_ctrl without enqueueing anything.
    $queue_ctrl->up;
    $thr->join;