get_userinfo( $userid ); my $p_count_in_userinfo = count_p_in_array; report_p_count_at_interface( $p_count_in_userinfo, $reporting_interface); sub get_userinfo{ my $userid = shift; my $is_this_gnix = get_gnixiness_system; get_userinfo_on_system( $userid, $is_this_gnix ); }