in reply to weird print results
foreach my $line (@results) { my ($first, $second, $third) = split(/::/, $line); print "ERROR: \$third is empty!\n" unless $third; print qq(<b>$first</b> <a href="$second&a=$first&t=$third">$third +</a><br>); }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: weird print results
by Anonymous Monk on Jul 01, 2006 at 18:03 UTC | |
by Ieronim (Friar) on Jul 01, 2006 at 18:05 UTC | |
by Anonymous Monk on Jul 01, 2006 at 18:11 UTC |