but from the output, it does not seem like the two subroutines are truly being executed in parallel which I require. It appears to me that run() is being ran first and for a good amount of time before listen() is executed. How can I make this work?

The output is irrelevant :)

They are being executed in parallel

The output might change if you do  STDOUT->blocking(0);