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: <13506.010720@globetravel.spb.ru>
To: cornet <mandrake-russian@altlinux.ru>
In-reply-To: <3B57E292.D0446C4F@zmail.ru>
References: <3B57E292.D0446C4F@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 11:55:01 2001
X-Original-Date: Fri, 20 Jul 2001 12:09:42 +0400
Archived-At: <http://lore.altlinux.org/community/13506.010720@globetravel.spb.ru/>
List-Archive: <http://lore.altlinux.org/community/>
List-Post: <mailto:mandrake-russian@linuxteam.iplabs.ru>

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

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

c> Есть строка, полученная программой из вне.
c> $string
c> Есть шаблон, полученный программой из вне.
c> $template

c> Как проверить наличие шаблона в строке если шаблон хранится в
c> переменной и на момент написания программы не известен???


c> if($string=~/^.*<как то указать на $template>.*$/)
c> {
c> print "Ok\n";
c> }

А Вы пробуете решить задачу, перед тем как спросить? =)
Кажется Вы и так все знаете =)

$_ = 'Here we will find any template';
$tpl = 'template';
print "Looks like we found this f...ing \$tpl\n" if (/$tpl/);

Rgds, maga.