Кто-нибудь Perl знает? Вопросик...

[ir]

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

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

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

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

[Ильгиз]

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

#! /usr/bin/perl

$a = "backslash\\";

$b = "slash\\";

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

[vg]

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

#! /usr/bin/perl

$a = "backslash\";

$b = "slash\";

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

Ужас а не язык

[ir]

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

#! /usr/bin/perl

$a = "backslash\";

$b = "slash\";

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

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

[ir]

Ужас а не язык

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

[spavel]

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

[Yury]

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

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