say "$^V / $Config{ archname } / $Config{ gccversion }";

cmpthese -3, {
    pwc   => sub { pwc( 1500, 2500, 1 )},
    pwc_p => sub { pwc_p( 1500, 2500, 1 )},
    ugly  => sub { ugly( 1500, 2500, 1 )},
};

# v5.32.1 / MSWin32-x64-multi-thread / 8.3.0
#         Rate   pwc pwc_p  ugly
# pwc    737/s    --  -48%  -77%
# pwc_p 1424/s   93%    --  -56%
# ugly  3251/s  341%  128%    --