gistfile1.txt

#!/usr/bin/perl

use strict;
use warnings;

use 5.010;

use Data::Dumper;

my @stuff = ( { a => 1, b => 2} );

# osse
say Dumper keys $stuff[0];

# sjohnson
say Dumper keys %{ $stuff[0] };

   keys HASH
   keys ARRAY
   keys EXPR