#! perl -slw use strict; use threads qw[ async ]; my @threads; push @threads, async{ system '\path\to\first.exe' }; push @threads, async{ system '\path\to\second.exe' }; $_->join for @threads;