$ perl -E '
    use strict;
    use warnings;
    say ref \my $scalar;
    say ref \my @array;
'
SCALAR
ARRAY