# Example of using map, grep, and sort in Perl
# Using map to double each element in an array
my @numbers = (1, 2, 3, 4, 5);
my @doubled = map { $_ * 2 } @numbers;
# Using grep to filter even numbers
my @even_numbers = grep { $_ % 2 == 0 } @numbers;
# Using sort to sort an array of strings
my @fruits = ("orange", "apple", "banana", "grape");
my @sorted_fruits = sort @fruits;
print "Doubled: @doubled\n"; # Output: Doubled: 2 4 6 8 10
print "Even Numbers: @even_numbers\n"; # Output: Even Numbers: 2 4
print "Sorted Fruits: @sorted_fruits\n"; # Output: Sorted Fruits: apple banana grape orange
How do I avoid rehashing overhead with std::set in multithreaded code?
How do I find elements with custom comparators with std::set for embedded targets?
How do I erase elements while iterating with std::set for embedded targets?
How do I provide stable iteration order with std::unordered_map for large datasets?
How do I reserve capacity ahead of time with std::unordered_map for large datasets?
How do I erase elements while iterating with std::unordered_map in multithreaded code?
How do I provide stable iteration order with std::map for embedded targets?
How do I provide stable iteration order with std::map in multithreaded code?
How do I avoid rehashing overhead with std::map in performance-sensitive code?
How do I merge two containers efficiently with std::map for embedded targets?