- $request_url = $uwobo_url . "add?$request_url";
- my $agent = LWP::UserAgent->new();
- my $response = $agent->get($request_url);
- print $response->as_string();
-# print "$request_url\n";
+ $request_url = $uwobo_url . "/add?$request_url";
+
+} elsif ($action eq "unload") { # unload predefined stylesheets
+ $request_url = $uwobo_url . "/remove?keys=" . join(',', keys %styles);
+
+} elsif ($action eq "reload") { # reload predefined stylesheets
+ $request_url = $uwobo_url . "/reload?keys=" . join(',', keys %styles);
+
+} else { # unknown action
+ die "Unknown action '$action'";