$VAR1 is not a hash, it's a reference to an array (of hashes).
It's not clear what part of $responsetextall[$i][$j]{attributeStatements} $VAR1 corresponds to. Can you clarify?
#!/usr/bin/perl
use warnings;
use strict;
my $arr = [ { namespace => 'urn:oasis:names:tc:SAML:2.0:attrname-forma
+t:unspecified',
name => 'First Name',
values => '[user.firstName]',
type => 'EXPRESSION' },
{ namespace => 'urn:oasis:names:tc:SAML:2.0:attrname-forma
+t:unspecified',
name => 'Last Name',
values => '[user.lastName]',
type => 'EXPRESSION' } ];
for my $hash (@$arr) {
print "$hash->{type}\t";
print "$hash->{values}\n";
}
map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]