Select Code to Download

#! perl -slw
use strict;
...
[    2] Waiting    at:       3672 ms
[    1] Waiting    at:       7077 ms
Terminating on signal SIGINT(2)

main: start recorder thread;
main: start player (in main);
main: wait for player to finish;
main: signal recorder thread to stop.