|
|
|
(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, 16:44 |
|
||
|
(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, 17:19 |
|
||
|
(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! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.03.2005, 18:54 |
|
||
|
|
start [/forum/topic.php?fid=23&fpage=482&tid=1478598]: |
0ms |
get settings: |
10ms |
get forum list: |
20ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
54ms |
get topic data: |
13ms |
get forum data: |
3ms |
get page messages: |
48ms |
get tp. blocked users: |
2ms |
| others: | 239ms |
| total: | 397ms |
| 0 / 0 |
