But this worked :goto LINE ....blah .... LINE: use Module;
:"(... Yes I needed to use goto..:"), may be NOP will be good candidat for here :") (after the specs for the task changed I've not used goto anymore :")) The other problem :goto LINE ....blah .... LINE: print; use Module;
DIDN'T worked..(yes in the docs is stated that I can't exit do{}, but this is a do{}while() :")) So I needed to do this :SWITCH: { if (..cond1..) {... last SWITCH}; if (..cond2..) { ... grab one row fetchrow_hashref ..populate field names.. do {..code last if blah; ...code... } while (condX); last SWITCH }; if (..cond3..) {... last SWITCH}; }
DO YOU see second braces.. PERL5.6 (Win98/ActiveState) OK...both problem are overcomed easly but ...!!! thanx for the attentionSWITCH: { if (..cond1..) {... last SWITCH}; if (..cond2..) { ... grab one row fetchrow_hashref ..populate field names.. { do {..code last if blah; } } while (condX); last SWITCH }; if (..cond3..) {... last SWITCH}; }
In reply to Not errors but possible bugs by raptor
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |