c:\perl\perl>hash_array.pl
"my" variable @array masks earlier declaration in same 
scope at C:\perl\perl\hash_array.pl line 16.
@array ARRAY(0x1a452dc)
$VAR1 = 0;
$VAR2 = 1;
$VAR3 = 2;
$VAR4 = 3;
$VAR5 = 4;
%hash x1
$VAR1 = 'one';
$VAR2 = [
          0,
          1,
          2,
          3,
          4
        ];
@array ARRAY(0x1ae73c8)
$VAR1 = 'a';
$VAR2 = 'b';
$VAR3 = 'c';
$VAR4 = 'd';
$VAR5 = 'e';
%hash x2
$VAR1 = 'one';
$VAR2 = [
          0,
          1,
          2,
          3,
          4
        ];
$VAR3 = 'two';
$VAR4 = [
          'a',
          'b',
          'c',
          'd',
          'e'
        ];