[ot][spam][crazy] coding therapy: maybe a bugfix?
Undescribed Horrific Abuse, One Victim & Survivor of Many
gmkarl at gmail.com
Wed Dec 7 01:15:36 PST 2022
Summaries:
# Task
Weabit, https://en.wikinews.org/wiki/User:Gryllida/welcome_a_bit ,
notifies people when pages are updated.
The task, http://savannah.nongnu.org/people/viewjob.php?group_id=11906&job_id=667
, is to:
- add support for non-english wikinews
- add localization to email texts
# Starting Source
>From https://savannah.nongnu.org/projects/weabit/ .
The script is under
:pserver:anonymous at cvs.savannah.nongnu.org:/sources/weabit weabit .
It's called weabv2.pl , and is a very simple daemon script with no
error checking.
# New Code to enumerate languages
use LWP::Simple;
use JSON;
use Data::Dumper;
# P424=language code; P6269=api url
# P31=instance of Q20671729=wikinews language
my $query = <<EOF;
SELECT ?code ?url WHERE {
[ wdt:P424 ?code; wdt:P6269 ?url ] wdt:P31 wd:Q20671729.
}
EOF
$result_str = get
"https://query.wikidata.org/sparql?format=json&query=${query}";
$result_list = decode_json($result_str)->{results}{bindings};
%code_urls = map { $_->{code}{value} => $_->{url}{value} } @$result_list;
print Dumper \%code_urls;
More information about the cypherpunks
mailing list