sub Statistics {
   for (@_) {
      die "Bad argument $_" if ref $_;
   }

   my %param = @_; # line 10
}

Statistics( 'Key1','Value2','Key2' );