Как сделать в PERL распознавание букв, цифр и символов?

Задание:
Случайным образом создать таблицу пар символьных значений и записать её в текстовый файл в виде:
X Y
a m
t 9
5 8
! 7
u *
Считать из файла пары значений и поместить в другой текстовый файл те из них, где X и Y являются буквами латинского алфавита или цифрами:
X Y
a m
5 8

я полагаю, начало такое:
#!/usr/bin/perl -w

$MAXNUM=100; # maximum number
$TOTNUM=300; # total numbers

# first part
open(F, "> pairs.txt") || die;

print F " X Y\n";

for($i=0; $i < $TOTNUM; $i++) {
print F int(rand($MAXNUM)+1)," ", int(rand($MAXNUM)+1), "\n";
}

close(F);

# second part
open(F, "< pairs.txt") || die;
open(M, "> mults.txt") || die;

а как дальше?

Примечание:
ну так как правильно сделать?

Примечание:
ПОЖАЛУЙСТА ОЧЕНЬ ПРОШУ ПОМОГИТЕ!!!!

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.