$ cat Mod.pm
package Mod;
print __PACKAGE__, "\n";
1;

$ perl -Mthreads -e'my @t = map { async { require Mod; }; } 1..2; $_->join() for @t;'
Mod
Mod