Posts on tag: source

Hier möchte ich mal ein kleines Scriptchen vorstellen, mit dem man Wikiseiten für PodWiki auf der Commandline erstellen und bearbeiten kann. Das ist manchmal recht praktisch, man muss nicht im Webinterface rumgurken. Und es hat den Vorteil, dass man auf diese Weise auch mal ein Porno Wiki während der Arbeitszeit bearbeiten kann (nicht, dass ich sowas tun würde *g*). Sozusagen der NSFW compatibility layer von PodWiki.

Also hier ist das Script:

#!/bin/sh

page=$1
me=`whoami`
www="www"

if test -z "$page"; then
        echo "Usage: $0 <page>"
        exit 1
fi

if ! test -e "$page"; then
        touch "$page"
        ci -t$page -minitial-checkin "$page"
        co "$page"
fi

meta=`md5 -q $page`
sudo chown $me "$page" "${page},v"

echo n | co -l "$page"
vi $page
newmeta=`md5 -q $page`
if test "$meta" = "$newmeta"; then
        echo "$page hasn't changed"
else
        ci -t-$page -mChangedByShellUser $page
fi
co -f $page
sudo chown www "$page" "${page},v"

Die Variable $www in der 5ten Zeile muss man womöglich seinen Gegebenheiten anpassen.

In Note war ein ziemlich übler Bug, der dazu geführt hat, dass beim Erstellen eines neuen Eintrags alte überschrieben wurden. Betroffen war nur das Backend NOTEDB::general, in welchem ich den Bug gefixt habe.

Neue Version gibts wie immer hier bei mir als erstes. Beim CPAN ist es hochgeladen, Distributoren und externe Maintainer werden (denke ich) demnächst nachziehen.

Ich habe das leo Script mal auf Vordermann gebracht. Zur Erinnerung: damit kann man auf dict.leo.org von der Commandline aus zugreifen. Wie üblich erhältlich beim CPAN Dealer Deines Vertrauens.

Ich habe eine neue Version meines Perlmoduls Config::General fertiggestellt. Es sind einige Bugs behoben, sowie neue Features hinzugekommen. Zum einen -NoEscape, mit dem man das Escapen von Werten komplett ausschalten kann und zum anderen -NormalizeBlock, -NormalizeOption und -NormalizeValue, denen man die Referenz einer Subroutine übergeben kann, welche den jeweiligen Wert verändern kann (z.b. Leerzeichen entfernen oder was weiss ich).

Aktuelle Version wie üblich entweder hier oder beim CPAN.