#!perl -l
system 1, q/perl -le "print 'child'; sleep 2; print 'child'"/;
sleep 1;
print 'parent';
sleep 2;
print 'parent';

##</code><code>##

child
parent
child
parent