Select Code to Download

#!/usr/bin/perl -w
#First example:
...
select (STDOUT);
print "done\n";

<privera> 121% select.pl
First example: select
...
This next message is written to both STDOUT and the fifth logfile
done