$ perl -e 'system "ps Tf ; sleep 1"'