sub build_exclude_list {
    # ...
    return \%exclude_list;
}

my $exclude_list = build_exclude_list ($exclude_list_file);