You might want to take a look at using Judy Arrays. Although not directly implemented in Perl, the Judy algorithms are C-callable and are optimized for large data arrays. Hope that helps!