Pre referenciu predkladam riesenie v Perle:
#!/usr/bin/perl
$urlArgs = '=Value1&Key2=Value2&Key3=1999-12-02';
%params = map { +"\l$$_[0]" => "\l$$_[1]" }
map { $$_[1] =~ s/^(\d{4})/$1 < 2000 ? 2000 : $1/e; $_ }
grep { $$_[0] =~ /^\p{IsUpper}/ &&
$$_[1] =~ /^(\p{IsUpper}|\d{4}(-\d\d){2}$)/ }
map { [ split /=/, $_ ] }
split '&', $urlArgs;
print "$params{key3}\n";
Opat linearne pridanie zopar prikazov do existujuceho kodu. Standardny Perlovsky text-processing.

