Каморка

Как заставить работать типа такого:

If ($abc =~ /$def/) {бла-бла}, если обе переменные содержат \\

В одном месте это интерпретируется как \ , в другом - как \\

Заменять и переназначать не хочу.

Ильгиз писал(а):

Код: Выделить всё

#! /usr/bin/perl

$a = "backslash\";

$b = "slash\";

if ($a =~ /\Q$b\E/) {
    print "$a contains $b\n";
}

Ужас а не язык

Ильгиз писал(а):

Код: Выделить всё

#! /usr/bin/perl

$a = "backslash\";

$b = "slash\";

if ($a =~ /\Q$b\E/) {
    print "$a contains $b\n";
}

Пасибки! Попробую, о результатах - доложу.
У меня еще один вопрос есть, но попробую сначала сама разобраться, потому как интересно.

vg писал(а): Ужас а не язык

Да что вы! Это ж самый красивый и лаконичный язык! Я такой кайф ловлю, когда удается на нем поработать! Вот щас около 100 разных отчетов делаются всего 50 строчками в Perl. Коротко и ясно. Причем с любой базы, ему без разницы.

А где в Ванкувере на Перле пишут... я уже лет 9-10 на нем не писал, а тогда ненашел...

spavel писал(а):А где в Ванкувере на Перле пишут... я уже лет 9-10 на нем не писал, а тогда ненашел...

дак на нем разве пишут?
его используют в повседневной жизни...