my @tmp = @_; shift; @tmp = shift; my @ARRAY = @{$tmp[0]}; @tmp = shift; my %HASH = %{$tmp[0]};