Perl question

[марик - камарик]

Я на перле пишу быстренький hack. Первый раз сегодня увидел код на перле и мне нужна помощь.

Вот этот кусок кода мне нужно чтоб распознал тот факт что $line contains $error and because it does I need it to execute if statement. So in other words I thought that ($line =~ m/$error1/i) must return true

$line = "abc blah-blah";
$error1 = "abc"

if ($line =~ m/$error1/i){
..............
..............
}

вот здесь я нашел способ сравнивать :
http://www.troubleshooters.com/codec...rl/perlreg.htm

The most basic string comparison is
$string =~ m/sought_text/;


But this shit doesn't work. Can anyone tell me why and how to fix it?

[марик - камарик]

Че, никто не поможет? Эх, вы...

[madison_]

перл ещё жив 8) ты бота решил написать ?

[марик - камарик]

Короче, ладно. Я уже нашел в чем дело было и проект отправил.

Думаю через дня 3-4 сюда придут дяди объяснять мне что в мои годы они в перле программы писали таские что еще и в рифму получалось и еще придут дяди возмущаться что это я темы открываю вместо того чтоб самому разбираться.

[смешно]

детский сад какой-то.

[марик - камарик]

детский сад какой-то.

Вот тебя я какраз имел ввиду :lol:

[смешно]

Ты вообще герой /не шучу/, как можно совмещать учёбу и кормление грудью? даже я так не смог.

[crazy-mike]

перл ещё жив 8) ты бота решил написать ?

жив. И там прикольный модуль под apache2. Но столько трабла с распределением памяти, что ничего на нём писать не хочется. Тем более, что на php десять строчек для связи с БД просто удобнее.

[марик - камарик]

Ты вообще герой /не шучу/, как можно совмещать учёбу и кормление грудью? даже я так не смог.

спасибо

[Olezhik]

Я на перле пишу быстренький hack. Первый раз сегодня увидел код на перле и мне нужна помощь.

Вот этот кусок кода мне нужно чтоб распознал тот факт что $line contains $error and because it does I need it to execute if statement. So in other words I thought that ($line =~ m/$error1/i) must return true

$line = "abc blah-blah";
$error1 = "abc"

if ($line =~ m/$error1/i){
..............
..............
}

вот здесь я нашел способ сравнивать :
http://www.troubleshooters.com/codec...rl/perlreg.htm

The most basic string comparison is
$string =~ m/sought_text/;


But this shit doesn't work. Can anyone tell me why and how to fix it?

ну ты спрасил, я не помню писал ли я на перле когда-то, а ты ещё помощи хочиш. Дай бог вспомнить как он вобще выгледит. Тыб ещё про паскаль спрасил, а лутше про перфо карты.

А рэгуляр экспрэшен должен знать любой программер, правельной дорогой идёш товариЩь!