с попапами большой практики работы до сего времени не было...
вот простой способ перейти на последнее открытое окно

my @w=$sel->get_all_window_names();
$sel->select_window($w[-1]);

До первого присваивания переменные содержат специальное значение undef,
которое на языке Perl выражает всего лишь следующее: «Не на что тут

смотреть - проходите мимо».

если не переключаться на латинскую раскладку, 
то обычный оператор сравнения строк в перл "eq" превращается в забавный "уй"
)))))))))))))))))))))))

 $sel->select($select_locator, $option_locator) Select an option from a drop-down using an option locator.( Read more... )

 пол дня пыталась подключить jquery локаторы к selenium rc 
( Read more... )

щас потестирую и оптимизирую для себя
Отправка письма на Perl через SMTP с аутентификацией и аттачем
ну или так:
http://www.opennet.ru/base/dev/smtp_auth_perl.txt.html
или все же mime:lite 
аааааааааа!)))) 

 хочется похалявить, сижу читаю статьи по eval и die 
потом пересмотрю код и вставлю в нужные, чет в процессе написания было лениво - теперь самое ОНО!)
для разминки мозгов...

написала кучку тестов
теперь надобно константные значения и общие подпрограммы вытащить в отдельный файл

читаю и засыпаю((( урррр! Пакеты и модули

 perl преобразование типов
http://club.shelek.ru/viewart.php?id=283

$` - строка, следующая за совпадением

$- - число строк, оставшихся на странице

$! - текущая ошибка

$` - разделитель полей массивов при интерполировании

$# - формат вывода чисел с плавающей точкой

( Read more... )