find . -type f \! -name '*.xz' -print0 \
                  | xargs -0r -P4 -n16 xz -T1

##</code><code>##

...
my $pid = $pm->start and next;
do { use POSIX; setsid; };  # child side
...