Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
17.03.2005, 16:44
|
|||
|---|---|---|---|
(Perl) Help |
|||
|
#18+
Guys, I am new in perl and I need your help! I have an error somebodyes code. PerlTray 6.0.0 build 117102 syntax error at CreatePackageRename.pl line 81, near ") ) " syntax error at CreatePackageRename.pl line 84, near "}" Code is below. it is doesn't like if. if ( $Package !~ /^$PRJ-(\d{8}-\d+-\w+?$/) ) { print "Error: Package name $Package doesn't match to PRJnn-YYYYMMDD-nnnn format\n"; exit 1; } else { $packageend = $1; } Best Regards, Alena ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
17.03.2005, 17:19
|
|||
|---|---|---|---|
|
|||
(Perl) Help |
|||
|
#18+
try to rreplace this string alenab if ( $Package !~ /^$PRJ-(\d{8}-\d+-\w+?$/) ) { Alena with if ( $Package !~ /^$PRJ-(\d{8}-\d+-\w+?)$/) { :) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
17.03.2005, 18:54
|
|||
|---|---|---|---|
(Perl) Help |
|||
|
#18+
Thanks a lot, it is work. I know, it is stupid to ask silly question... Any good advise abou book perl scripting without HTML stuff, we are using perl scripts for Harvest. It is just a pain to open a sxript with 4500 line and have not any good debugger for it! And I have 17 those scripts long like a hell! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=23&tablet=1&tid=1478598]: |
0ms |
get settings: |
10ms |
get forum list: |
15ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
143ms |
get topic data: |
11ms |
get forum data: |
3ms |
get page messages: |
37ms |
get tp. blocked users: |
1ms |
| others: | 231ms |
| total: | 457ms |
| 0 / 0 |
