C:\test>perl -Mthreads -Mbignum -wE"$_->join foreach map async { say threads->tid; 2**8-1 } , 1..2" 1 2 C:\test>perl -Mthreads -Mbignum -wE"$_->join foreach map async { say threads->tid; 2**85-1 } , 1..2" 1 2 C:\test>perl -Mthreads -Mbignum -wE"$_->join foreach map async { say threads->tid; 2**859-1 } , 1..2" 1 2 C:\test>perl -Mthreads -Mbignum -wE"$_->join foreach map async { say threads->tid; 2**8594-1 } , 1..2" 1 2 C:\test>perl -Mthreads -Mbignum -wE"$_->join foreach map async { say threads->tid; 2**85943-1 } , 1..2" 1 2 C:\test>perl -Mthreads -Mbignum -wE"$_->join foreach map async { say threads->tid; 2**859433-1 } , 1..2" 1 2