use threads;
threads->new(sub { print "Foo!\n"; });