⭐ 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; } } [download]