The POSIX Shell's "select" loop for Perl Tim Maher <tim@teachmeperl.com>