my $queue = Thread::Queue->new();
$queue->enqueue(\@rows);
my @threads = map { threads->create( \&process, $queue ); } 1 .. 4;
...