From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <maga@globetravel.spb.ru>
From: Sergey Degtyaryov <maga@globetravel.spb.ru>
X-Mailer: The Bat! (v1.39) Educational
X-Priority: 3 (Normal)
Message-ID: <2551.010720@globetravel.spb.ru>
To: cornet <mandrake-russian@altlinux.ru>
In-reply-To: <3B57F32F.775AB105@zmail.ru>
References: <3B57F32F.775AB105@zmail.ru>
Mime-Version: 1.0
Content-Type: text/plain; charset=koi8-r
Content-Transfer-Encoding: 8bit
Subject: [mdk-re] =?koi8-r?B?UmU6IFttZGstcmVdIO/C0sHUzs8gcGVybA==?=
Sender: mandrake-russian-admin@altlinux.ru
Errors-To: mandrake-russian-admin@altlinux.ru
X-BeenThere: mandrake-russian@altlinux.ru
X-Mailman-Version: 2.0
Precedence: bulk
Reply-To: mandrake-russian@altlinux.ru
X-Reply-To: Sergey Degtyaryov <maga@globetravel.spb.ru>
List-Help: <mailto:mandrake-russian-request@altlinux.ru?subject=help>
List-Post: <mailto:mandrake-russian@altlinux.ru>
List-Subscribe: <http://altlinux.ru/mailman/listinfo/mandrake-russian>,
	<mailto:mandrake-russian-request@altlinux.ru?subject=subscribe>
List-Id: Linux-Mandrake RE / ALT Linux discussion list <mandrake-russian.altlinux.ru>
List-Unsubscribe: <http://altlinux.ru/mailman/listinfo/mandrake-russian>,
	<mailto:mandrake-russian-request@altlinux.ru?subject=unsubscribe>
List-Archive: <http://altlinux.ru/pipermail/mandrake-russian/>
Date: Fri Jul 20 12:59:11 2001
X-Original-Date: Fri, 20 Jul 2001 13:14:04 +0400
Archived-At: <http://lore.altlinux.org/community/2551.010720@globetravel.spb.ru/>
List-Archive: <http://lore.altlinux.org/community/>
List-Post: <mailto:mandrake-russian@linuxteam.iplabs.ru>

Доброго времени суток, cornet,

20.07.2001 в 13:00 Вы сказали буквально следующее:

c> В том то и дело, что нет! В регулярных выражениях (по крайней
c> мере в perl) символ $ обозначает конец строки, а не начало имени
c> переменной. Такой код не работает - уже пробовал - он всегда дает
c> истину вне зависимости от содержимого $_ лишь бы она была
c> определена. 

Неправда Ваша все же.
Попробуйте

$string = '00120';
for (1..5)
{
($string =~ /^.*$_.*$/) ? print "Found\n" : print "Not found\n";
}

$ - конец строки, $_ - переменная.

Rgds, maga