gegeben sei:
| use URI;
| [...]
| my $down_url = new URI ('http://' . $language . '.wikipedia.org/w/index.php');
| my %p = ('title' => $downlemma, 'action' => 'raw');
| $p {'oldid'} = $oldid if (defined ($oldid) && $oldid =~ /^\d+$/);
| $down_url->query_form (\%p);
Kann man das Hash-Literal auch dynamisch erweitern, ohne auf
die "Hilfsvariable" %p angewiesen zu sein, i. e. etwas � la:
| $down_url->query_form ({'title' => $downlemma, 'action' => 'raw',
| (defined ($oldid) && $oldid =~ /^\d+$/ ? 'oldid' => $oldid)});
oder ist das nicht m�glich?
TIA,
Tim
Tim Landscheidt wrote:
> Kann man das Hash-Literal auch dynamisch erweitern, ohne auf
> die "Hilfsvariable" %p angewiesen zu sein, i. e. etwas � la:
>
> | $down_url->query_form ({'title' => $downlemma, 'action' => 'raw',
> | (defined ($oldid) && $oldid =~ /^\d+$/ ? 'oldid' => $oldid)});
>
> oder ist das nicht m�glich?
Doch, aber zu dem '?' geh�rt noch ein ':'
defined ($oldid) && $oldid =~ /^\d+$/ ? ('oldid' => $oldid) : ()
HTH,
Moritz
--
Moritz Lenz
http://perl-6.de/ http://moritz.faui2k3.org/
>> Kann man das Hash-Literal auch dynamisch erweitern, ohne auf
>> die "Hilfsvariable" %p angewiesen zu sein, i. e. etwas � la:
>> | $down_url->query_form ({'title' => $downlemma, 'action' => 'raw',
>> | (defined ($oldid) && $oldid =~ /^\d+$/ ? 'oldid' => $oldid)});
>> oder ist das nicht m�glich?
> Doch, aber zu dem '?' geh�rt noch ein ':'
> defined ($oldid) && $oldid =~ /^\d+$/ ? ('oldid' => $oldid) : ()
... und es h�tte sich aus eigentlich aus perldata erschlie-
�en lassen k�nnen; aber ich war wahrscheinlich zu sehr auf
"Element" statt auf "(Unter-) Liste" fixiert.
Danke,
Tim