What are best practices for working with Perl array performance?

# Example of efficient array handling in Perl

# Using array slicing for better performance
my @array = (1 .. 100000);
my @slice = @array[0 .. 9]; # Fetches the first 10 elements efficiently

# Pre-allocating array size to avoid dynamic resizing
my @large_array;
$#large_array = 99999; # Allocating space for 100,000 elements

# Using push and pop for stack operations
push @large_array, 1; # Add an element
my $last_element = pop @large_array; # Remove the last element

# Using map for transformations
my @squared = map { $_ ** 2 } @array; # Squares each element

# Avoiding deep copies with references
my $array_ref = \@array; # Using a reference instead of copying the whole array