ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Gleb Galkin 2:5020/400 23 Nov 2000 19:39:11
To : All
Subject : вопрос к мастерам регэкспов
--------------------------------------------------------------------------------
Hi All!
Как внутри html-тегов перевести все имена файлов в нижний регистр при
этом не трогая директорий?
Т. е преобразовать <a href="../DiRectory/FiLeName.HTML>
в <a href="../DiRectory/filename.html>
Я написал функцию которая преобразует правильно строку внутри кавычек.
Hо как вызвать функцию из регекспа?
пытаюсь делать так
while (<DATA>) {
chomp;
if ($_ =~ /<*href=*>|<*src=*>|<*background=*>/i) {
if ($_ =~ /\"*\"/) {
$newname = &my_function($1);
s/$1/\"$newname\"/g;
}
s/\"*\"/lc($1)/g;
}
print "$_\n";
}
а еще ведь в одной строчке может быть не один тег а много...
а как узнать заранее?
---------------------------
Best Regards, Gleb Galkin
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
