$array[1]->{Contact} = [];

%hash = ( Contact_Tel  => '1234',
          Contact_Name => 'Mr. Bean');

push @{$array[1]->{Contact}}, \%hash;