use strict;
 use warnings;

 use Prima qw( Application Buttons Label );

#use Parallel::ForkManager;
#use MCE;
#use MCE::Loop;
 use MCE::Hobo;

 use MCE::Shared;

 my $que = MCE::Shared->queue();

#busy loop, review top at OS level, press Ctrl-C to exit
 for ( 1 .. 2e9 ) { 1 }