|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Alexey V Drougov 2:5020/400 28 Nov 2000 02:11:44
To : All
Subject : Re: кусок скрипта
--------------------------------------------------------------------------------
On Mon, 27 Nov 2000, Dmitry Mikhailov wrote:
> Hello All!
>
> Вот сабж
> -------------
> $today=`date +%d%m`;
chomp $today; # иначе $today заканчивается символом перевода строки
>
> while($inputline=<file_in>) {
> print "$inputline";
> if ($inputline=~ /$today/) {
> print file_out ("$inputline");
> }
> else {
> print file_out ("----\n");
> }
> }
> --------------
> но получается так, что в выходной файл записыватся $inputline только в тех
> случаях, когда вся строка равна переменной today, если же переменная является
> частью строки, то не работает. Как я понял, то оператор =~ ищет вхождение
> подстроки в строку. Где я напартачил или непонял?
>
> /Dmitry
> ... Способной ночи, малыши !
>
- ---
TSB Russian Express, Moscow
Alexey V. Drougov, friendof@express.ru
http://www.express.ru
--- ifmail v.2.15dev5
* Origin: Russian Express I.S.P. (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
Re: кусок скрипта 
