to avoid the message
i changed the code-line 190 as followsUse of uninitialized value in concatenation (.) or string at d:/Perl/site/lib/lz.pm line 190.
the code is clear and works properly but i don't like it because it strikes me as rather bulky. Any suggestions for a more elegant way ? Can i perhaps avoid the do-Block ?.#my $outPath = $obj->{outpath}{absolut} . "-" . $obj->{sap}{jfExtNum}; my $outPath = $obj->{outpath}{absolut} . do { defined $obj->{sap}{jfExtNum} && "-" . $obj->{sap}{jfExtNum} };
thanks in advance
In reply to concatenating partially uninitialized values by tos
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |