Страница 1 из 1
Вырезать строку perl'ом
Добавлено: 2008-03-11 18:30:41
Sintez_MAT
Подскажите плиз, как perl'ом(или может awk) вырезать из большого html текста определеный кусок начинающийся, например, с <div id="result_box" dir="ltr"> и заканчивающийся на </div></td></tr><tr><td id="submitcell">
Спасибо!
Re: Вырезать строку perl'ом
Добавлено: 2008-03-12 13:05:13
idle
Sintez_MAT писал(а):Подскажите плиз, как perl'ом(или может awk) вырезать из большого html текста определеный кусок начинающийся, например, с <div id="result_box" dir="ltr"> и заканчивающийся на </div></td></tr><tr><td id="submitcell">
Спасибо!
Код: Выделить всё
$_='<div id="result_box" dir="ltr"> определённый кусок </div></td></tr><tr><td id="submitcell">';
s/<div id="result_box" dir="ltr">(.*)<\/div><\/td><\/tr><tr><td id="submitcell">/$1/;
print;
Re: Вырезать строку perl'ом
Добавлено: 2008-03-12 22:34:40
ProFTP
Код: Выделить всё
foreach $i (@contents){
$i=~s{'>.*.</a></td>}{}ig;
$i=~s{' target=_blank>.*.</div>}{}ig;
print "$i";
}
строку
Код: Выделить всё
@dd = grep { (<div)|(<title>)/i } @contents;
Re: Вырезать строку perl'ом
Добавлено: 2011-01-16 20:43:37
Я
Привет всем. Не хочу показаться археологом, но все же.
Есть дира в ней есть разные файлы среди которых есть файл (1) с расширением .c. делаю:
появляется файл, к примеру test.c (имя.расширение). Подскажите как отрезать только имя файла, чтобы не было .c (точки и расширения).
Заранее благодарен за отввет.
Re: Вырезать строку perl'ом
Добавлено: 2011-01-17 0:26:02
ProFTP
Код: Выделить всё
my ($head, $tail) = $file =~ /^(.*)\.([^.]+)$/
Re: Вырезать строку perl'ом
Добавлено: 2011-01-17 22:55:42
Я
Сорри за оффтоп, а для шелла есть команда?
заранее спасибо.
Может сработает что-то типа:
Код: Выделить всё
ls | grep .c | perl -e 'my ($head, $tail) = $file =~ /^(.*)\.([^.]+)$/'
просто пишу makefile для avrdude, и в makefile есть строка target = <namefile_without_dot_c>
вот я и хочу сделать один makefile для этой цели.