use Debug::Filter::PrintExpr;
...
my $some_var = 'some content';
my @array = qw(this is an array);
my %hash = (key1 => 'value1', key2 => 'value2');

#${$some_var}
#@{@array}
#${$array[3]}
#%{custom_label: %hash}