Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Название темы: perl
Показать сообщение отдельно

Ветеран


Сообщения: 1404
Благодарности: 135

Профиль | Отправить PM | Цитировать


Примерно таким образом
Код: Выделить весь код
open (INPUT, "master.txt");
while(<INPUT>)
{
chomp($_);
$link=$_;

<... указанный вами код...>

}
close (INPUT);
Вообще сайт и директорию лучше указывать в master.txt, а не вводить вручную, чтобы скрипт сам вычленил из ссылки вида http://localhost/home/1.php смысловые части, например:
$link=~/(.*?)\:\/\/(.*?)(\/.*\/)(.*)/;
$site=$2; #localhost
$path=$3; #/home/
$file=$4; #1.php

Отправлено: 19:44, 08-09-2006 | #3

Название темы: perl