#! 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;

##</code><code>##

system 1, '\path\to\your.exe';