c:\test>copy con test.pl
print 'Hello from test.pl';
^Z
        1 file(s) copied.

c:\test>perl -Mthreads -E"async{ do 'test.pl' }->join"
Hello from test.pl
c:\test>