|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Dmitry Mikhailov 2:464/910.2 27 Nov 2000 22:40:20
To : All
Subject : кусок скрипта
--------------------------------------------------------------------------------
Вот сабж
-------------
$today=`date +%d%m`;
while($inputline=<file_in>) {
print "$inputline";
if ($inputline=~ /$today/) {
print file_out ("$inputline");
}
else {
print file_out ("----\n");
}
}
--------------
но получается так, что в выходной файл записыватся $inputline только в тех
случаях, когда вся строка равна переменной today, если же переменная является
частью строки, то не работает. Как я понял, то оператор =~ ищет вхождение
подстроки в строку. Где я напартачил или непонял?
/Dmitry
... Способной ночи, малыши !
--- GoldED+/LNX 1.1.4.5
* Origin: [ хочу спать ] (2:464/910.2)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
