⭐ in reply to Is it possible to write to 2 files, eg. print LOGFILE,TEMP 'hello'?
multiprint("hello\n", LOGFILE, TEMP); sub multiprint { my $text = shift; for my $fh (@_) { print $fh $text; } }
In Section
Seekers of Perl Wisdom
⭐ in reply to Is it possible to write to 2 files, eg. print LOGFILE,TEMP 'hello'?
multiprint("hello\n", LOGFILE, TEMP); sub multiprint { my $text = shift; for my $fh (@_) { print $fh $text; } }