my $scalarRef = $VAR1->[0];
print  $$scalarRef;
print ${  $VAR1->[0]  };