Mercurial > hg > lukkari
comparison parsedata.pl @ 161:62687fee6f1c
Cosmetic.
| author | Matti Hamalainen <ccr@tnsp.org> |
|---|---|
| date | Thu, 20 Aug 2015 06:27:40 +0300 |
| parents | c0c69b3b1f7d |
| children | 70f432e3d1dc |
comparison
equal
deleted
inserted
replaced
| 160:a84b40bc2a99 | 161:62687fee6f1c |
|---|---|
| 429 return join(", ", @out) if ($opt_mode eq "php"); | 429 return join(", ", @out) if ($opt_mode eq "php"); |
| 430 return join("", @out); | 430 return join("", @out); |
| 431 } | 431 } |
| 432 | 432 |
| 433 # Skip zero position this way (can't use foreach here) | 433 # Skip zero position this way (can't use foreach here) |
| 434 for (my $i = 1; $i < scalar(@{$q}); $i++) { | 434 for (my $i = 1; $i < scalar(@{$q}); $i++) |
| 435 { | |
| 435 my $d = $$q[$i]{"nodes"}; | 436 my $d = $$q[$i]{"nodes"}; |
| 436 if (defined($d)) | 437 if (defined($d)) |
| 437 { | 438 { |
| 438 foreach my $n (@{$d}) | 439 foreach my $n (@{$d}) |
| 439 { | 440 { |