my $thr = threads->new(stack_size => 65535);

##</code><code>##

use threads { default_stack => 65535 };

##</code><code>##

$thr->create({stack=>65535}, 'function', 'arg1','arg2');

##</code><code>##

$thr->create('function','arg1','arg2'); # use defaults
$thr->create_with(
   -call   => 'function',
   -args   => ['arg1','arg2'],
   -stack  => 65535
);

##</code><code>##

my $stack = $thr->get_stack_size() + 1024;
$thr->set_stack_size($stack) if $stack <= 2048;