Der Code-Schnippsel-Thread

#!/bin/dash
PARENT=$(ps h -p $PPID -o command)
# wenn wir von nojs.sh aufgerufen werden, wollen wir diesen Header nicht noch mal mitten in der Ausgabe
if test ${PARENT%% /*} != /bin/dash; then
        echo "Content-Type: text/html; charset=UTF-8"
        echo
fi
unset PARENT


echo "<h2>Thermische Informationen</h2>"
echo "<p><em>Anmerkung:</em> <code>fan1</code> bezeichnet den Gehäuse-, <code>fan2</code> den CPU-Lüfter.</p>"
echo -n "<pre>"
sensors | grep -e ^fan[12] -e '^[CM].. ' | tr "+." " ," | sed -e 's/\(.*RPM\)  .*$/\1/'
echo "</pre>"


echo "<h2>BOINC</h2>"
TEMPFILE=$(mktemp)
boinccmd --get_simple_gui_info 2>/dev/null >$TEMPFILE
if test -s $TEMPFILE; then
        LINE=$(grep -nE '^={8} Results' $TEMPFILE | cut -d: -f1); LINE=$((LINE+1))
        tail -n +$LINE $TEMPFILE | grep -e ^[0-9]*\) -e '^\s*report' -e '^\s*ready to report' \
        -e '^\s*current CPU time:' -e '^\s*fraction done:' -e '^\s*estimated CPU time' | \
        sed 's/^\([0-9]\)*).*$/<\/pre>\n<h3>Aufgabe \1<\/h3>\n<pre>/;s/^\s*//' | \
        tail -n +2 # um das <pre></pre> vor der ersten Aufgabe zu unterdrücken
        echo "</pre>"
else
        echo "<p>BOINC läuft gerade nicht.</p>"
fi
rm -f $TEMPFILE
unset TEMPFILE LINE

PROGRAM:WUERFEL
:Disp "WUERFEL V1.5"
:Disp "Anzahl der","Würfelzahlen?"
:Prompt A
:Disp "Zahlen auf dem","Würfel?"     REM ne bessere formulierung ist mir nicht eingefallen; falls jemand das nicht kapiert nacher sieht mans am Quelltext
:Prompt B
:Lbl A
:ClrHome  REM aka Clear Screen
:Disp randInt(1,B,A),"WEITER: ENTER"
:Repeat K≠0
:getKey➙K
:End
:If K=105:Goto A

import urllib, re, sys


DOWNLOAD_PATH="D:\\z0r\\"


def dotter(blockcount, blocksize, totalsize):
    # Dummy-Eventhandler fuer urlretrieve(). Simuliert Gefuehl von Taetigkeit.
    sys.stdout.write(".")


lastloop=None


try:
    nh = urllib.urlopen("http://z0r.de/info")
except URLError:
    sys.stderr.write("Fehler beim Verbindungsaufbau zu z0r.de!\n")
    sys.exit(1)


for stri in nh.readlines():
    if stri.find("Insgesamt gibt es zur Zeit") > -1:
        match = re.search("zur Zeit (\d+) Flashloops", stri)
        if match.lastindex == 1:
            lastloop = int(match.group(1))
nh.close()
if lastloop is None:
    sys.stderr.write("Konnte Anzahl der Flashloops nicht extrahieren!\n")
    sys.exit(2)


for flash in range(lastloop):
    url = "http://z0r.de/L/z0r-de_" + repr(flash) + ".swf"
    fname = DOWNLOAD_PATH + "z0r-" + repr(flash) + ".swf"
    
    sys.stdout.write("Downloading " + fname + " ")
    urllib.urlretrieve(url, fname, dotter)
    sys.stdout.write("\n")

[Adblock Plus 1.1]
! Checksum: OUVdlaiuzBJJoCzVGawbQQ
! Facebook-Like-Krams
facebook.com^$third-party
facebook.net^$domain=~facebook.com
!! bisher keine Treffer, kann aber nicht schaden in der Liste zu halten
fbcdn.com^$domain=~facebook.com
fbcdn.net^$domain=~facebook.com
||widgets.yiid.com/w/like/full.php?*
! Community-Krams
|http://z0r.de/corner/*.png
|http://german-bash.org/images/community_icons/*.png
! Ceiling Jimmy Is Watching You Not Donate
|http://*.wikipedia.org/w/index.php?title=*cn.js*
! Invisible Overlays
http://9gag.com/img/invisible.gif
! nervige Warnmeldungen
maps.google.de##.print-warnbox-content

#!/bin/sh


cd $HOME/.irssi


LOGNO=1
while [ -f log${LOGNO}.gz ]; do LOGNO=$((LOGNO+1)); done


# input ist ein FIFO (Named Pipe).
# irssi ist konfiguriert, ausschließlich in diese Datei zu loggen.
gzip -c < input > log${LOGNO}.gz &


irssi

#!/bin/bash
# taschenrechner.sh


check_number() {
    if [ -z $1 ]; then return 2
    else
        if grep -Eq "^-?[0-9]+$" <<<$1
        then return 0; else return 1; fi
    fi
}


check_operator() {
    if [ -z "$1" ] || [ `expr length x$1` -gt 2 ]; then return 2
    else
        if grep -q "[+*/-]" <<<$1
        then return 0; else return 1; fi
    fi
}


echo "Taschenrechner"
while true; do
    echo -n "1. Zahl eingeben: "
    read ZAHL1
    if ! check_number $ZAHL1; then
        echo "Keine gültige Ganzzahl, bitte neu eingeben!" 1>&2
    else break; fi
done
while true; do
    echo -n "2. Zahl eingeben: "
    read ZAHL2
    if ! check_number $ZAHL2; then
        echo "Keine gültige Ganzzahl, bitte neu eingeben!" 1>&2
    else break; fi
done
while true; do
    echo -n "Operation (+, -, *, /) wählen: "
    read OP
    if ! check_operator "$OP"; then
        echo "Nicht unterstützter Operator!" 1>&2
    else break; fi
done


case $OP in
    +)  echo "Summe: $((ZAHL1+ZAHL2))" ;;
    -)  echo "Differenz: $((ZAHL1-ZAHL2))" ;;
    \*) echo "Produkt: $((ZAHL1*ZAHL2))" ;;
    /)  echo -n "Quotient: $((ZAHL1/ZAHL2))"
        if [ $((ZAHL1%ZAHL2)) -ne 0 ]; then
            echo " (Rest $((ZAHL1%ZAHL2)))"
        else
            echo ""
        fi ;;
    *) echo "Fehler im System..." 1>&2
esac