use strict and foreach

[RArul]

Friends, 

When I wish to simultaneously output the information to console screen as
well a log file, I am getting an error if I have the use strict pragma
turned on. If I comment it out, it works fine. How would I overcome this
problem?

Here is the pseudo-code:

use strict;
use FileHandle;
use constant CONSOLE => 'STDOUT';

# some code goes in here and filehandles are properly maintained..

foreach(CONSOLE, $FH){
        print $_ ("Some information");
}

It complains about STDOUT not defined when strict subs are in
effect..blah..blah..

Thanks in advance,
Rex

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]