$ perle 'my %fh = (err => \*STDERR); print {$fh{err}} "errmsg\n";'
errmsg

$ perle 'my %fh = (err => *STDERR); print {$fh{err}} "errmsg\n";'
errmsg