$ alias perle
alias perle='perl -Mstrict -Mwarnings -Mautodie=:all -MCarp::Always -E'

##</code><code>##

$ perle 'open my $fh, ">", "not_a_file"; say "$fh"; unlink "not_a_file";'
GLOB(0x8000c42e0)

$ perle 'my $hashref = {}; say "$hashref";'
HASH(0x800003bc8)

##</code><code>##

Bareword "STDERR" not allowed while "strict subs" in use ...

##</code><code>##

use strict;
use warnings;

##</code><code>##

$ perle 'my $x = \*STDERR; say "$x";'
GLOB(0x80008fcd0)

$ perle 'my $x = *STDERR; say "$x";'
*main::STDERR

##</code><code>##

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

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

##</code><code>##

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

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