sub Show_analyst_row { my(%analyst_record)=%{@_}; print STDERR (join "\n", %analyst_record); }