Select Code to Download

sub getvars {
    my $profile = shift;
...

    return \%event_nums, \%prof_var_names, \@sorted_vars, $last_evnt_n
+ame;
}