use MCE::Shared;
use compute qw/ process $progress /;

sub my_loop_updating_the_progress {

my $point_of_progress = $compute::progress->get();
...do whatever I want with $point_of_progress...
}

sub launch computation {
@arguments_needed = ( arg1, arg2, arg3, arg4 ... arg9, arg10);
compute::process(@arguments_needed);
}