Can't use string ("STDOUT") as a symbol ref while "strict refs"
in use at /usr/lib/perl5/5.8.0/Term/Cap.pm line 576.

##</code><code>##

#!/usr/bin/perl
use warnings;
use Term::Cap 'no strict refs';