Маленькая поправочка:
# use List::Util;
use List::Util qw/shuffle/;

4. Вызывать stat внутри sort{} — это не комильфо. Питоновское решение из комментария выше красивей.

5. Удалить повторяющиеся элементы в массиве.
Тут есть побочный эффект — еще и меняется порядок элементов.

6. Перемешать элементы массива. Долой велосипеды:
use List::Util;
@list = shuffle @list

7. «$rand = $links[int rand() * scalar @links];»
Ужасный код. Я давно программирую на perl, но мой взгляд споткнулся на этом выражении и вместо того, чтобы думать над общей идеей я начинаю вспоминать приоритеты операций и думать, как это варажение будет восприматься компилятором. В общем, лакончиность есть, красота не появилась (имхо).

За примеры на Python спасибо. Сам я на нем не пишу, но подозревал, что аналогичные задачи на Python решаются не хуже, чем на Perl. Рад, что он оправдал мои ожидания :)

Просто ради интереса сделал те же задачки на Python.

#!/usr/bin/env python
# coding=utf-8

# 1. Проверить, существует ли элемент в массиве
el = 10
arr = [10, 20, 30, 40]
print el in arr

# 2. Удалить из массива arr элементы, которые есть в массиве skip
skip = [30, 40, 50, 60]
arr = [i for i in (set(arr) - set(skip))]
print arr

# 3. Скрипт замены строк в тексте
import re
p = re.compile(r'd+')
print re.sub(p, 'a number', '2 * 2 = 4')

# 4. Вывести список имен файлов и каталогов в заданной директории,
# отсортированный по дате последнего доступа.
import os
from stat import ST_ATIME
names = [(name, os.stat(name)[ST_ATIME]) for name in os.listdir('.')]
names.sort(key=lambda x: x[1])
print names

# 5. Удалить повторяющиеся элементы в массиве.
arr1 = [1, 2, 3, 1, 3]
arr2 = [i for i in set(arr1)]
print arr2

# 6. Перемешать элементы массива
import random
a = [1, 2, 3, 4, 5, 6, 7, 8, 9, 10]
random.shuffle(a)

# 7. Выбрать случайный элемент в массиве
print random.choice(a)

# 8. Аналог PHP функции urlencode
# http://docs.python.org/library/urllib.html#urll…