Hi Keith
Wrote a small program that will reproduce the problem.
#!/usr/bin/perl my $limitstart = 20; my $limitantal = 20; strange_sub(limitstart => $limitstart, limitantal => $limitantal); strange_sub(); sub strange_sub { my (%params) = @_; my $string = 'limit ' . $params{'limitantal'} if ((!$params{'l +imitstart'}) && ($params{'limitantal'})); $string = 'limit ' . $params{'limitstart'} . ", " . $params{'l +imitantal'} if (($params{'limitstart'}) && ($params{'limitantal'})); print STDERR "limitstring = " . $string . "\n"; }
/jocke
In reply to Re^2: 'my' problems
by jockel
in thread 'my' problems
by jockel
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |