$ tperl -e'fork && exit for 1..100'
CPU 0.044 secs (CPU 0.020 secs)
 $ tperl -e'my @x=(1..35_000);share(@x);fork && exit for 1..100'
CPU 0.072 secs (CPU 0.072 secs)
 $ tperl -e'my @x=(1..35_000);for(1..100){if(fork){for(@x){my$y=$_};exit}}'
CPU 0.084 secs