|
|
|
(Perl) Проблема с выполнением рег. выражения над переменной my...
|
|||
|---|---|---|---|
|
#18+
Oбъявил переменную $sql_client как my: my $sql_client; Далее формирвал в ней строку... После чего хочу удалить последнюю запятую: $sql_client=~s{,?$} и нефига запятая на месте... До того, как сделал my всё удалялось.... Что делать? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 04.08.2005, 17:42 |
|
||
|
(Perl) Проблема с выполнением рег. выражения над переменной my...
|
|||
|---|---|---|---|
|
#18+
В смысле $sql_client=~s{,?$} {};... и нифига! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 04.08.2005, 17:52 |
|
||
|
(Perl) Проблема с выполнением рег. выражения над переменной my...
|
|||
|---|---|---|---|
|
#18+
а где ты ее my обявлял и где пытался удалить ? пример кода ? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 04.08.2005, 17:58 |
|
||
|
(Perl) Проблема с выполнением рег. выражения над переменной my...
|
|||
|---|---|---|---|
|
#18+
короче чтоб самому понять сделай еще в начале use strict; и многое узнаеш... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 04.08.2005, 18:04 |
|
||
|
(Perl) Проблема с выполнением рег. выражения над переменной my...
|
|||
|---|---|---|---|
|
#18+
вот как-раз strict то я и вставил.... После чего и пришлось в my делать... Значение переменной в той месте с запятой, после операции тоже с запятой... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.08.2005, 10:06 |
|
||
|
(Perl) Проблема с выполнением рег. выражения над переменной my...
|
|||
|---|---|---|---|
|
#18+
modвот как-раз strict то я и вставил.... После чего и пришлось в my делать... Значение переменной в той месте с запятой, после операции тоже с запятой... дык код то какой ? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.08.2005, 10:10 |
|
||
|
(Perl) Проблема с выполнением рег. выражения над переменной my...
|
|||
|---|---|---|---|
|
#18+
Код длинный: my $sql_client=''; if($client_name ne $client_name_old) { $sql_client="$sql_client client_name='$client_name', "; } if($identifier ne $identifier_old) { $sql_client="$sql_client identifier='$identifier', "; } if($client_birthday ne $client_birthday_old) { $sql_client="$sql_client client_birthday='$client_birthday', "; } if($client_address ne $client_address_old) { $sql_client="$sql_client client_address='$client_address', "; } if($client_telephone ne $client_telephone_old) { $sql_client="$sql_client client_telephone='$client_telephone', "; } $sql_client=~s{,?$} {}; ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.08.2005, 15:20 |
|
||
|
(Perl) Проблема с выполнением рег. выражения над переменной my...
|
|||
|---|---|---|---|
|
#18+
во первЫх в том коде что ты привел впринципе не будет запятых на конце строки ( у тебя там пробел на конце ), во вторых я сильно подозреваю,что этот кусок кода часть цикла который ты таки не привел. Я вот сильно не уверен, что у тебя my $sql_client не объявлен два раза внутри и снаружи.... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 05.08.2005, 15:49 |
|
||
|
(Perl) Проблема с выполнением рег. выражения над переменной my...
|
|||
|---|---|---|---|
|
#18+
На самом деле, как выяснилось там да, пробелы на конце... Пробелы убрал теперь работает... Всем спасибо! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 09.08.2005, 12:59 |
|
||
|
|

start [/forum/topic.php?fid=23&msg=33203229&tid=1477789]: |
0ms |
get settings: |
8ms |
get forum list: |
14ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
194ms |
get topic data: |
9ms |
get forum data: |
2ms |
get page messages: |
47ms |
get tp. blocked users: |
1ms |
| others: | 235ms |
| total: | 516ms |

| 0 / 0 |
