https://www.noname-ev.de/wiki/api.php?action=feedcontributions&user=212.202.233.238&feedformat=atomNoName e.V. - User contributions [en]2024-03-28T13:43:26ZUser contributionsMediaWiki 1.39.5https://www.noname-ev.de/wiki/index.php?title=Codegolf/3&diff=5278Codegolf/32008-07-25T09:02:44Z<p>212.202.233.238: /* Inoffizielle, vom Schiri nicht bestätigte Scores */</p>
<hr />
<div>== Challenge #3: Wochentagberechnung ==<br />
"Wie ist der Wochentag eines bestimmten Datums?"<br />
<br />
$ ./wochentag 1. Januar 1970<br />
Donnerstag<br />
$<br />
<br />
Siehe: http://de.wikipedia.org/wiki/Wochentagsberechnung<br />
<br />
<br />
Um es ein wenig golfbarer zu machen, rechnen wir nur mit dem<br />
gregorianischen Kalender.<br />
<br />
Man kann davon ausgehen, dass das Programm immer mit einem legitimen Datum aufgerufen wird. Der Aufruf ist immer in der Form<br />
\d+\. (Januar|Februar|März|April|Mai|Juni|Juli|August|September|Oktober|November|Dezember) \d+<br />
Die Ausgabe muss:<br />
(Montag|Dienstag|Mittwoch|Donnerstag|Freitag|Samstag|Sonntag)\n<br />
entsprechen.<br />
<br />
[[user:sur5r|sur5r]] ist der Schiedsrichter dieser Challenge.<br />
<br />
Es dürfen keine generischen/speziellen Datumsumrechnungsmodule der Sprache benutzt werden, auch wenn sie Bestandteil der Distribution der Sprache sind.<br />
<br />
Das Programm darf nichts nach STDERR schreiben<br />
<br />
=== Test ===<br />
#!/usr/bin/ruby<br />
def assert_eq(a, b)<br />
raise Exception.new("assertion failed: "+a+"!="+b) if a!=b<br />
end<br />
assert_eq `#{ARGV[0]} 14. Juli 1789`, "Dienstag\n"<br />
assert_eq `#{ARGV[0]} 23. Mai 1949`, "Montag\n"<br />
assert_eq `#{ARGV[0]} 20. März 1983`, "Sonntag\n"<br />
assert_eq `#{ARGV[0]} 9. November 1989`, "Donnerstag\n"<br />
assert_eq `#{ARGV[0]} 12. Januar 2006`, "Donnerstag\n"<br />
assert_eq `#{ARGV[0]} 1. Januar 2000`, "Samstag\n"<br />
assert_eq `#{ARGV[0]} 1. März 2000`, "Mittwoch\n"<br />
<br />
./test.rb ./wochentag<br />
<br />
Der Test ist genau dann erfolgreich, wenn keinerlei Ausgabe erfolgt.<br />
<br />
=== Inoffizielle, vom Schiri nicht bestätigte Scores ===<br />
<br />
* sECuRE / zsh: 156<br />
* urs / Perl: 173<br />
* yath / Perl: 188<br />
* mxf / Perl: 189<br />
* [[User:PhilFry|PhilFry]] / Ruby: 217<br />
* downhill / Perl: 245<br />
* sECuRE / C: 261 byte (normal), 221 byte (obfuscated, ohne compileraufruf), 133 byte (obfuscated, nicht rules-compliant, ohne compileraufruf)<br />
* [[User:Kungi|Kungi]] / Python: 257<br />
* [[User:CentronX|CentronX]] / PowerShell: ca. 800 (Ja, I know!)<br />
* SdK / ABAP: 1586<br />
* $du</div>212.202.233.238https://www.noname-ev.de/wiki/index.php?title=Codegolf/3&diff=5277Codegolf/32008-07-25T08:43:27Z<p>212.202.233.238: /* Inoffizielle, vom Schiri nicht bestätigte Scores */</p>
<hr />
<div>== Challenge #3: Wochentagberechnung ==<br />
"Wie ist der Wochentag eines bestimmten Datums?"<br />
<br />
$ ./wochentag 1. Januar 1970<br />
Donnerstag<br />
$<br />
<br />
Siehe: http://de.wikipedia.org/wiki/Wochentagsberechnung<br />
<br />
<br />
Um es ein wenig golfbarer zu machen, rechnen wir nur mit dem<br />
gregorianischen Kalender.<br />
<br />
Man kann davon ausgehen, dass das Programm immer mit einem legitimen Datum aufgerufen wird. Der Aufruf ist immer in der Form<br />
\d+\. (Januar|Februar|März|April|Mai|Juni|Juli|August|September|Oktober|November|Dezember) \d+<br />
Die Ausgabe muss:<br />
(Montag|Dienstag|Mittwoch|Donnerstag|Freitag|Samstag|Sonntag)\n<br />
entsprechen.<br />
<br />
[[user:sur5r|sur5r]] ist der Schiedsrichter dieser Challenge.<br />
<br />
Es dürfen keine generischen/speziellen Datumsumrechnungsmodule der Sprache benutzt werden, auch wenn sie Bestandteil der Distribution der Sprache sind.<br />
<br />
Das Programm darf nichts nach STDERR schreiben<br />
<br />
=== Test ===<br />
#!/usr/bin/ruby<br />
def assert_eq(a, b)<br />
raise Exception.new("assertion failed: "+a+"!="+b) if a!=b<br />
end<br />
assert_eq `#{ARGV[0]} 14. Juli 1789`, "Dienstag\n"<br />
assert_eq `#{ARGV[0]} 23. Mai 1949`, "Montag\n"<br />
assert_eq `#{ARGV[0]} 20. März 1983`, "Sonntag\n"<br />
assert_eq `#{ARGV[0]} 9. November 1989`, "Donnerstag\n"<br />
assert_eq `#{ARGV[0]} 12. Januar 2006`, "Donnerstag\n"<br />
assert_eq `#{ARGV[0]} 1. Januar 2000`, "Samstag\n"<br />
assert_eq `#{ARGV[0]} 1. März 2000`, "Mittwoch\n"<br />
<br />
./test.rb ./wochentag<br />
<br />
Der Test ist genau dann erfolgreich, wenn keinerlei Ausgabe erfolgt.<br />
<br />
=== Inoffizielle, vom Schiri nicht bestätigte Scores ===<br />
<br />
* sECuRE / zsh: 156<br />
* urs / Perl: 173<br />
* yath / Perl: 188<br />
* mxf / Perl: 189<br />
* [[User:PhilFry|PhilFry]] / Ruby: 217<br />
* downhill / Perl: 245<br />
* sECuRE / C: 261 byte (normal), 221 byte (obfuscated, ohne compileraufruf), 133 byte (obfuscated, nicht rules-compliant, ohne compileraufruf)<br />
* [[User:Kungi|Kungi]] / Python: 265<br />
* [[User:CentronX|CentronX]] / PowerShell: ca. 800 (Ja, I know!)<br />
* SdK / ABAP: 1586<br />
* $du</div>212.202.233.238https://www.noname-ev.de/wiki/index.php?title=HowTo_Aufnahme&diff=4201HowTo Aufnahme2008-03-28T09:16:38Z<p>212.202.233.238: /* Requests */</p>
<hr />
<div>== Chaotische Viertelstunde ==<br />
<br />
Die '''Chaotische Viertelstunde''' soll wieder ein wenig mehr Chaos für unsere Donnerstage bringen.<br />
Das Ganze ist so gedacht, das immer wer gerade Lust hat sich einträgt oder auf der Mailingliste meldet, dass er ein kleines Thema hat über das er gerne 15 Minuten reden möchte. Mit der Zeit muss es dabei nicht sooo genau genommen werden, der Vortrag sollte aber möglichst ohne viele Hilfsmittel realisierbar sein. Im Anschluss ist eine Diskussion jederzeit möglich oder eben Fragen, Anregungen, whatever ..<br />
Es darf und soll über sämtliche chaotischen Themen gesprochen werden, egal ob es sich um ein privates Projekt handelt, lustige Entdeckungen oder ob man etwas zur aktuellen Tagespolitik zu sagen hat.<br />
<br />
== Wünsche an die Vortragenden ==<br />
<br />
Wünschenswert wäre es wenn ihr die Chaotische Viertelstunde vorher ankündigt damit alle die interessiert sind das mitbekommen. Es wäre auch noch sehr schön wenn ihr zu euren Chaotischen Viertelstunden eine minimale kleine Wikiseite basteln könntet. Im Nachhinein oder auch gerne vorher. Dort sollten vielleicht Folien, falls ihr welche habt, ein paar links zu dem Thema die ihr gut findet und noch ein wenig Information drum herum stehen, damit man nach dem Vortrag noch einmal ein wenig nachrecherchieren kann.<br />
<br />
{{Navigation-Info}}<br />
<br />
== Kommende Donnerstage ==<br />
<br />
== Und das habt ihr verpasst ==<br />
* 27.03.2008 [[Bacula-Vortrag von sECuRE]], ebenfalls als 50% Vortrag/50%-Workshop im [[Bistro Planet]] (<s>wir haben dort geschlossene Gesellschaft</s> wir hätten dort geschlossene Gesellschaft haben sollen :-().<br />
* 06.03.2008: Chaotische 2h über [http://www.openstreetmap.org Openstreetmap] von [[User:sur5r|sur5r]]<br />
* 28.02.2008: [[Lisp Interpreter selbst bauen]] ([[User:PhilFry|PhilFry]])<br />
* 22.02.2008 [[Lisp Vortrag]] von [[User:PhilFry|PhilFry]] und [[User:Kungi|Kungi]], mit anschließendem Workshop für Interessierte. Der Vortrag fand im Forum41 beim FIXME-Treffen der UUGRN statt.<br />
* 12.04.2007: Python auf Nokia Series 60 Telefonen eine kurze Einführung ([[User:Kungi|Kungi]])<br />
* 15.02.2007: Visualisierung von Programmen (Benedikt)<br />
<br />
== Angebote ==<br />
''Wer etwas erzählen könnte, hier eintragen''<br />
<br />
* irgendwann: chaotische halbe Stunde, KungFoo vs. PhilFry -- Python vs. Ruby<br />
<br />
* Themenvorschlag: http://nodebox.net/ Nicht für mich selbst, aber vielleicht interessiert das jemanden der Python kann und der danach darüber reden möchte. --PhilFry<br />
<br />
* Irgendwann: Weil ich drauf angesprochen wurde mal was über Digitalfotografie zu erzählen. Was sollte man beachten, Unterschiede zur analogen Fotografie, Optiken, Formate und andere Fremdworte. --SdK<br />
<br />
* im April/Mai: mxallowd - anti-spam-daemon auf Basis des nolisting-Prinzips (http://nolisting.org/), jedoch etwas erweitert. In C geschrieben, läuft mit iptables. Klein, super-performant und recht effektiv (man könnte das sogar tatsächlich in 15 Minuten durchkriegen :-)) --[[User:SECuRE|sECuRE]] 00:05, 14 March 2008 (UTC)<br />
<br />
== Requests ==<br />
''Wer etwas über ein Thema erfahren möchte, hier eintragen''<br />
<br />
* DNS und alles was damit zusammen hängt. Auch in Verbinung mit AFS. Zonen einrichten, Gefahren und Sicherheitsprobleme bei öffentlichen DNS Servern. --SdK<br />
** kann ich gerne mal machen, wird aber noch ein bissel dauern, bis ich die Zeit finde. --[[User:CentronX|CentronX]] 14:46, 5 February 2008 (UTC)<br />
<br />
Da ich zum Koordinator der Chaotischen Viertelstunde auserkoren wurde habe ich einfach mal eine Liste an Vorträgen die so mancher von uns halten könnte erstellt. Es ist alles vorläufig und keiner ist gezwungen. Aber ich denke es ist eine gute Idee wenn jeder von uns sich mal an einer CV beteiligt hat.<br />
<br />
'''Themenideen:'''<br />
{| border="1" cellspacing="0" cellpadding="10"<br />
|-----<br />
! Thema || Wer? || Wer evtl noch? || Interessenten<br />
|-----<br />
| ABAP || SdK || craegga || <br />
|-----<br />
| Kryptographie || fjg || || Kungi<br />
|-----<br />
| Bildbearbeitung || hdi || || <br />
|-----<br />
| perl || mxf || || <br />
|-----<br />
| Statistik || TrickSTer || || craegga, Kungi<br />
|-----<br />
| QT || Kungi || || <br />
|-----<br />
| SCADA Hacking (Industrieautomatisierung) || TabascoEye || || <br />
|-----<br />
| AFS || CentronX || || Kungi<br />
|-----<br />
| C# und andere MS-Sachen || azatoth || || <br />
|-----<br />
| Computerlinguistik || nicolas || || Kungi<br />
|-----<br />
| Amateurfunk || craegga || || <br />
|-----<br />
| Lockpicking || ? evtl. ma die Karlsruher LP fragen || || <br />
|-----<br />
| Gentoo || noodles || secure || <br />
|-----<br />
| LPIC || drmotte || || <br />
|-----<br />
| PIC Microcontroller || moredread || || <br />
|-----<br />
| Wirkung von Linux auf Anfaenger || MSI || || <br />
|-----<br />
| OpenWRT || MSI || || <br />
|-----<br />
| Semantic Web || Yvo || || Kungi<br />
|-----<br />
| Steganographie || The Tiny Toon || || <br />
|-----<br />
| Continuations || Phil || || <br />
|}<br />
<br />
<br />
-- Kungi<br />
<br />
Hab das mal als Tabelle umgesetzt [[User:Craegga|craegga]] 08:39, 28 March 2008 (UTC)<br />
[[Category:Projekte]]<br />
[[Category:Events]]</div>212.202.233.238https://www.noname-ev.de/wiki/index.php?title=HowTo_Aufnahme&diff=4200HowTo Aufnahme2008-03-28T08:52:23Z<p>212.202.233.238: /* Requests */</p>
<hr />
<div>== Chaotische Viertelstunde ==<br />
<br />
Die '''Chaotische Viertelstunde''' soll wieder ein wenig mehr Chaos für unsere Donnerstage bringen.<br />
Das Ganze ist so gedacht, das immer wer gerade Lust hat sich einträgt oder auf der Mailingliste meldet, dass er ein kleines Thema hat über das er gerne 15 Minuten reden möchte. Mit der Zeit muss es dabei nicht sooo genau genommen werden, der Vortrag sollte aber möglichst ohne viele Hilfsmittel realisierbar sein. Im Anschluss ist eine Diskussion jederzeit möglich oder eben Fragen, Anregungen, whatever ..<br />
Es darf und soll über sämtliche chaotischen Themen gesprochen werden, egal ob es sich um ein privates Projekt handelt, lustige Entdeckungen oder ob man etwas zur aktuellen Tagespolitik zu sagen hat.<br />
<br />
== Wünsche an die Vortragenden ==<br />
<br />
Wünschenswert wäre es wenn ihr die Chaotische Viertelstunde vorher ankündigt damit alle die interessiert sind das mitbekommen. Es wäre auch noch sehr schön wenn ihr zu euren Chaotischen Viertelstunden eine minimale kleine Wikiseite basteln könntet. Im Nachhinein oder auch gerne vorher. Dort sollten vielleicht Folien, falls ihr welche habt, ein paar links zu dem Thema die ihr gut findet und noch ein wenig Information drum herum stehen, damit man nach dem Vortrag noch einmal ein wenig nachrecherchieren kann.<br />
<br />
{{Navigation-Info}}<br />
<br />
== Kommende Donnerstage ==<br />
<br />
== Und das habt ihr verpasst ==<br />
* 27.03.2008 [[Bacula-Vortrag von sECuRE]], ebenfalls als 50% Vortrag/50%-Workshop im [[Bistro Planet]] (<s>wir haben dort geschlossene Gesellschaft</s> wir hätten dort geschlossene Gesellschaft haben sollen :-().<br />
* 06.03.2008: Chaotische 2h über [http://www.openstreetmap.org Openstreetmap] von [[User:sur5r|sur5r]]<br />
* 28.02.2008: [[Lisp Interpreter selbst bauen]] ([[User:PhilFry|PhilFry]])<br />
* 22.02.2008 [[Lisp Vortrag]] von [[User:PhilFry|PhilFry]] und [[User:Kungi|Kungi]], mit anschließendem Workshop für Interessierte. Der Vortrag fand im Forum41 beim FIXME-Treffen der UUGRN statt.<br />
* 12.04.2007: Python auf Nokia Series 60 Telefonen eine kurze Einführung ([[User:Kungi|Kungi]])<br />
* 15.02.2007: Visualisierung von Programmen (Benedikt)<br />
<br />
== Angebote ==<br />
''Wer etwas erzählen könnte, hier eintragen''<br />
<br />
* irgendwann: chaotische halbe Stunde, KungFoo vs. PhilFry -- Python vs. Ruby<br />
<br />
* Themenvorschlag: http://nodebox.net/ Nicht für mich selbst, aber vielleicht interessiert das jemanden der Python kann und der danach darüber reden möchte. --PhilFry<br />
<br />
* Irgendwann: Weil ich drauf angesprochen wurde mal was über Digitalfotografie zu erzählen. Was sollte man beachten, Unterschiede zur analogen Fotografie, Optiken, Formate und andere Fremdworte. --SdK<br />
<br />
* im April/Mai: mxallowd - anti-spam-daemon auf Basis des nolisting-Prinzips (http://nolisting.org/), jedoch etwas erweitert. In C geschrieben, läuft mit iptables. Klein, super-performant und recht effektiv (man könnte das sogar tatsächlich in 15 Minuten durchkriegen :-)) --[[User:SECuRE|sECuRE]] 00:05, 14 March 2008 (UTC)<br />
<br />
== Requests ==<br />
''Wer etwas über ein Thema erfahren möchte, hier eintragen''<br />
<br />
* DNS und alles was damit zusammen hängt. Auch in Verbinung mit AFS. Zonen einrichten, Gefahren und Sicherheitsprobleme bei öffentlichen DNS Servern. --SdK<br />
** kann ich gerne mal machen, wird aber noch ein bissel dauern, bis ich die Zeit finde. --[[User:CentronX|CentronX]] 14:46, 5 February 2008 (UTC)<br />
<br />
Da ich zum Koordinator der Chaotischen Viertelstunde auserkoren wurde habe ich einfach mal eine Liste an Vorträgen die so mancher von uns halten könnte erstellt. Es ist alles vorläufig und keiner ist gezwungen. Aber ich denke es ist eine gute Idee wenn jeder von uns sich mal an einer CV beteiligt hat.<br />
<br />
'''Themenideen:'''<br />
{| border="1" cellspacing="0" cellpadding="10"<br />
|-----<br />
! Thema || Wer? || Wer evtl noch? || Interessenten<br />
|-----<br />
| ABAP || SdK || craegga || <br />
|-----<br />
| Kryptographie || fjg || || Kungi<br />
|-----<br />
| Bildbearbeitung || hdi || || <br />
|-----<br />
| perl || mxf || || <br />
|-----<br />
| Statistik || TrickSTer || || craegga, <br />
|-----<br />
| QT || Kungi || || <br />
|-----<br />
| SCADA Hacking (Industrieautomatisierung) || TabascoEye || || <br />
|-----<br />
| AFS || CentronX || || Kungi<br />
|-----<br />
| C# und andere MS-Sachen || azatoth || || <br />
|-----<br />
| Computerlinguistik || nicolas || || Kungi<br />
|-----<br />
| Amateurfunk || craegga || || <br />
|-----<br />
| Lockpicking || ? evtl. ma die Karlsruher LP fragen || || <br />
|-----<br />
| Gentoo || noodles || secure || <br />
|-----<br />
| LPIC || drmotte || || <br />
|-----<br />
| PIC Microcontroller || moredread || || <br />
|-----<br />
| Wirkung von Linux auf Anfaenger || MSI || || <br />
|-----<br />
| OpenWRT || MSI || || <br />
|-----<br />
| Semantic Web || Yvo || || Kungi<br />
|-----<br />
| Steganographie || The Tiny Toon || || <br />
|-----<br />
| Continuations || Phil || || <br />
|}<br />
<br />
<br />
-- Kungi<br />
<br />
Hab das mal als Tabelle umgesetzt [[User:Craegga|craegga]] 08:39, 28 March 2008 (UTC)<br />
[[Category:Projekte]]<br />
[[Category:Events]]</div>212.202.233.238https://www.noname-ev.de/wiki/index.php?title=Codegolf&diff=2857Codegolf2007-09-18T14:35:20Z<p>212.202.233.238: /* Kungi: Python */</p>
<hr />
<div>=== Challenge #1 ===<br />
<SdK> gibts wörter, die nach rot13 n anderes existierendes wort ergeben?<br />
<br />
==== mxf: Perl ====<br />
perl -nle'$w{+lc}++}for(keys%w){$r=$_;y/a-z/n-za-m/;$w{$_}&&print"$r -> $_' /usr/share/dict/web2<br />
<br />
65+2 Zeichen<br />
<br />
==== urs: Perl ====<br />
perl -nle'($u=$a{$i=$_=lc})&&print"$_->$u";y;a-z;n-za-m;;$a{$_}=$i' /usr/share/dict/web2<br />
<br />
56+2 Zeichen<br />
<br />
==== [[User:PhilFry|PhilFry]]: Ruby ====<br />
ruby -e'y={};$<.each{|w|w.chop!.downcase!;y[w]=0;r=w.tr"a-z","n-za-m";y[r]&&(p w+"->"+r)}' < /usr/share/dict/web2<br />
<br />
81 Zeichen<br />
<br />
==== Ch3ka: php ====<br />
<?$f=file($argv[1]);while($a[]=strtolower(next($f))){}while($b[]=str_rot13(next($a))){$c=end($b);if(in_array($c,$a))echo$c;}?><br />
122 Chrs<br />
<br />
==== [[User:Kungi|Kungi]]: Python ====<br />
import sys<br />
e=dict([(a,0)for a in open(sys.argv[1]).read().lower().split()])<br />
for w in e:<br />
b=w.encode('rot13')<br />
if b in e:<br />
print w+" -> "+b<br />
<br />
kungi@BeerBook: wc golf.py <br />
6 19 140 golf.py<br />
<br />
==== k-zed: common lisp ====<br />
<br />
(with-open-file (s "/usr/share/dict/web2")<br />
(let ((d (make-hash-table :test #'equal)))<br />
(loop for l = (read-line s nil) until (not l)<br />
do (setf (gethash (string-downcase l) d) t))<br />
(maphash<br />
(lambda (k v)<br />
(let ((p (map 'string (lambda (c) (code-char (+ (mod (- (char-code c) 84) 26) 97))) k)))<br />
(when (gethash p d) (format t "~A -> ~A~%" k p)))) d)))<br />
<br />
[[Category:Projekte]]</div>212.202.233.238https://www.noname-ev.de/wiki/index.php?title=Codegolf&diff=2856Codegolf2007-09-18T14:34:25Z<p>212.202.233.238: /* Kungi: Python */</p>
<hr />
<div>=== Challenge #1 ===<br />
<SdK> gibts wörter, die nach rot13 n anderes existierendes wort ergeben?<br />
<br />
==== mxf: Perl ====<br />
perl -nle'$w{+lc}++}for(keys%w){$r=$_;y/a-z/n-za-m/;$w{$_}&&print"$r -> $_' /usr/share/dict/web2<br />
<br />
65+2 Zeichen<br />
<br />
==== urs: Perl ====<br />
perl -nle'($u=$a{$i=$_=lc})&&print"$_->$u";y;a-z;n-za-m;;$a{$_}=$i' /usr/share/dict/web2<br />
<br />
56+2 Zeichen<br />
<br />
==== [[User:PhilFry|PhilFry]]: Ruby ====<br />
ruby -e'y={};$<.each{|w|w.chop!.downcase!;y[w]=0;r=w.tr"a-z","n-za-m";y[r]&&(p w+"->"+r)}' < /usr/share/dict/web2<br />
<br />
81 Zeichen<br />
<br />
==== Ch3ka: php ====<br />
<?$f=file($argv[1]);while($a[]=strtolower(next($f))){}while($b[]=str_rot13(next($a))){$c=end($b);if(in_array($c,$a))echo$c;}?><br />
122 Chrs<br />
<br />
==== [[User:Kungi|Kungi]]: Python ====<br />
import sys<br />
e=dict([(a,0)for a in open(sys.argv[1]).read().lower().split()])<br />
for w in e:<br />
b=w.encode('rot13')<br />
if b in e:<br />
print w+" -> "+b<br />
<br />
kungi@BeerBook: wc golf.py <br />
6 19 140 golf.py<br />
<br />
==== k-zed: common lisp ====<br />
<br />
(with-open-file (s "/usr/share/dict/web2")<br />
(let ((d (make-hash-table :test #'equal)))<br />
(loop for l = (read-line s nil) until (not l)<br />
do (setf (gethash (string-downcase l) d) t))<br />
(maphash<br />
(lambda (k v)<br />
(let ((p (map 'string (lambda (c) (code-char (+ (mod (- (char-code c) 84) 26) 97))) k)))<br />
(when (gethash p d) (format t "~A -> ~A~%" k p)))) d)))<br />
<br />
[[Category:Projekte]]</div>212.202.233.238https://www.noname-ev.de/wiki/index.php?title=Codegolf&diff=2854Codegolf2007-09-18T13:59:46Z<p>212.202.233.238: /* Kungi: Python */</p>
<hr />
<div>=== Challenge #1 ===<br />
<SdK> gibts wörter, die nach rot13 n anderes existierendes wort ergeben?<br />
<br />
==== mxf: Perl ====<br />
perl -nle'$w{+lc}++}for(keys%w){$r=$_;y/a-z/n-za-m/;$w{$_}&&print"$r -> $_' /usr/share/dict/web2<br />
<br />
65+2 Zeichen<br />
<br />
==== urs: Perl ====<br />
perl -nle'($u=$a{$i=$_=lc})&&print"$_->$u";y;a-z;n-za-m;;$a{$_}=$i' /usr/share/dict/web2<br />
<br />
56+2 Zeichen<br />
<br />
==== [[User:PhilFry|PhilFry]]: Ruby ====<br />
ruby -e'y={};$<.each{|w|w.chop!.downcase!;y[w]=0;r=w.tr"a-z","n-za-m";y[r]&&(p w+"->"+r)}' < /usr/share/dict/web2<br />
<br />
81 Zeichen<br />
<br />
==== Ch3ka: php ====<br />
<?$f=file($argv[1]);while($a[]=strtolower(next($f))){}while($b[]=str_rot13(next($a))){$c=end($b);if(in_array($c,$a))echo$c;}?><br />
122 Chrs<br />
<br />
==== [[User:Kungi|Kungi]]: Python ====<br />
import sys<br />
e={};e=e.fromkeys(open(sys.argv[1]).read().lower().split(),0)<br />
for w in e.keys():<br />
b=w.encode('rot13')<br />
if b in e:<br />
print w+" -> "+b<br />
<br />
kungi@BeerBook: wc golf.py <br />
6 16 144 golf.py<br />
<br />
[[Category:Projekte]]</div>212.202.233.238https://www.noname-ev.de/wiki/index.php?title=Codegolf&diff=2853Codegolf2007-09-18T13:56:47Z<p>212.202.233.238: /* Kungi: Python */</p>
<hr />
<div>=== Challenge #1 ===<br />
<SdK> gibts wörter, die nach rot13 n anderes existierendes wort ergeben?<br />
<br />
==== mxf: Perl ====<br />
perl -nle'$w{+lc}++}for(keys%w){$r=$_;y/a-z/n-za-m/;$w{$_}&&print"$r -> $_' /usr/share/dict/web2<br />
<br />
65+2 Zeichen<br />
<br />
==== urs: Perl ====<br />
perl -nle'($u=$a{$i=$_=lc})&&print"$_->$u";y;a-z;n-za-m;;$a{$_}=$i' /usr/share/dict/web2<br />
<br />
56+2 Zeichen<br />
<br />
==== [[User:PhilFry|PhilFry]]: Ruby ====<br />
ruby -e'y={};$<.each{|w|w.chop!.downcase!;y[w]=0;r=w.tr"a-z","n-za-m";y[r]&&(p w+"->"+r)}' < /usr/share/dict/web2<br />
<br />
81 Zeichen<br />
<br />
==== Ch3ka: php ====<br />
<?$f=file($argv[1]);while($a[]=strtolower(next($f))){}while($b[]=str_rot13(next($a))){$c=end($b);if(in_array($c,$a))echo$c;}?><br />
122 Chrs<br />
<br />
==== [[User:Kungi|Kungi]]: Python ====<br />
import sys<br />
e={};e=e.fromkeys(open(sys.argv[1]).read().lower().split(),0)<br />
for w in e.keys():<br />
b=w.encode('rot13')<br />
if e.has_key(b):<br />
e[b]=w<br />
print w+" -> "+b<br />
<br />
kungi@BeerBook: wc golf.py <br />
7 15 159 golf.py<br />
<br />
[[Category:Projekte]]</div>212.202.233.238https://www.noname-ev.de/wiki/index.php?title=Codegolf&diff=2852Codegolf2007-09-18T13:56:18Z<p>212.202.233.238: /* Kungi: Python */</p>
<hr />
<div>=== Challenge #1 ===<br />
<SdK> gibts wörter, die nach rot13 n anderes existierendes wort ergeben?<br />
<br />
==== mxf: Perl ====<br />
perl -nle'$w{+lc}++}for(keys%w){$r=$_;y/a-z/n-za-m/;$w{$_}&&print"$r -> $_' /usr/share/dict/web2<br />
<br />
65+2 Zeichen<br />
<br />
==== urs: Perl ====<br />
perl -nle'($u=$a{$i=$_=lc})&&print"$_->$u";y;a-z;n-za-m;;$a{$_}=$i' /usr/share/dict/web2<br />
<br />
56+2 Zeichen<br />
<br />
==== [[User:PhilFry|PhilFry]]: Ruby ====<br />
ruby -e'y={};$<.each{|w|w.chop!.downcase!;y[w]=0;r=w.tr"a-z","n-za-m";y[r]&&(p w+"->"+r)}' < /usr/share/dict/web2<br />
<br />
81 Zeichen<br />
<br />
==== Ch3ka: php ====<br />
<?$f=file($argv[1]);while($a[]=strtolower(next($f))){}while($b[]=str_rot13(next($a))){$c=end($b);if(in_array($c,$a))echo$c;}?><br />
122 Chrs<br />
<br />
==== [[User:Kungi|Kungi]]: Python ====<br />
import sys<br />
e={};e=e.fromkeys(open(sys.argv[1]).read().lower().split(),0)<br />
for w in e.keys():<br />
b=w.encode('rot13')<br />
if e.has_key(b):<br />
e[b]=w<br />
print w+" -> "+b<br />
<br />
kungi@BeerBook: wc golf.py (0) <br />
7 15 159 golf.py<br />
<br />
[[Category:Projekte]]</div>212.202.233.238https://www.noname-ev.de/wiki/index.php?title=Codegolf&diff=2840Codegolf2007-09-18T10:46:13Z<p>212.202.233.238: /* Kungi: Python */</p>
<hr />
<div>=== Challenge #1 ===<br />
<SdK> gibts wörter, die nach rot13 n anderes existierendes wort ergeben?<br />
<br />
==== mxf: Perl ====<br />
perl -nle'$w{+lc}=lc}for(keys%w){y/a-z/n-za-m/;$r=$w{$_}&&print"$r -> $_"' /usr/share/dict/web2<br />
<br />
63+2 Zeichen<br />
<br />
==== [[User:PhilFry|PhilFry]]: Ruby ====<br />
ruby -e'words={};IO.readlines(ARGV[0]).each{|w|words[w.downcase.chomp]=true};words.each_key{|w|r=w.tr("a-z","n-za-m");puts w+"->"+r if words[r]}' /usr/share/dict/web2 <br />
<br />
136 Zeichen [[http://phil.idlecrew.de/rot13.txt Ausgabe]]<br />
<br />
real 0m9.114s<br />
user 0m5.692s<br />
sys 0m0.421s<br />
<br />
==== Ch3ka: php ====<br />
<?$a=file('/usr/share/dict/web2');while($b[]=strtolower(str_rot13(next($a)))){}foreach($a as $c)if(in_array(strtolower($c),$b))echo $c;?><br />
<br />
ch3ka@bihatsch: wc rot13test.php <br />
1 4 138 rot13test.php<br />
<br />
v2:<br />
<?$f=file($argv[1]);while($a[]=strtolower(next($f))){}while($b[]=str_rot13(next($a))){$c=end($b);if(in_array($c,$a))echo$c;}?><br />
122 Chrs<br />
<br />
==== [[User:Kungi|Kungi]]: Python ====<br />
import sys<br />
e={};a=open(sys.argv[1]).read().lower().split()<br />
for w in a:e[w]=""<br />
for w in a:<br />
b=w.encode('rot13')<br />
if e.has_key(b):e[b]=w<br />
for a,b in e.iteritems():<br />
if b:print a+" -> "+b<br />
<br />
kungi@BeerBook: wc golf2.py<br />
8 23 184 golf2.py<br />
<br />
[[Category:Projekte]]</div>212.202.233.238https://www.noname-ev.de/wiki/index.php?title=Codegolf&diff=2839Codegolf2007-09-18T10:45:45Z<p>212.202.233.238: /* Kungi: Python */</p>
<hr />
<div>=== Challenge #1 ===<br />
<SdK> gibts wörter, die nach rot13 n anderes existierendes wort ergeben?<br />
<br />
==== mxf: Perl ====<br />
perl -nle'$w{+lc}=lc}for(keys%w){y/a-z/n-za-m/;$r=$w{$_}&&print"$r -> $_"' /usr/share/dict/web2<br />
<br />
63+2 Zeichen<br />
<br />
==== [[User:PhilFry|PhilFry]]: Ruby ====<br />
ruby -e'words={};IO.readlines(ARGV[0]).each{|w|words[w.downcase.chomp]=true};words.each_key{|w|r=w.tr("a-z","n-za-m");puts w+"->"+r if words[r]}' /usr/share/dict/web2 <br />
<br />
136 Zeichen [[http://phil.idlecrew.de/rot13.txt Ausgabe]]<br />
<br />
real 0m9.114s<br />
user 0m5.692s<br />
sys 0m0.421s<br />
<br />
==== Ch3ka: php ====<br />
<?$a=file('/usr/share/dict/web2');while($b[]=strtolower(str_rot13(next($a)))){}foreach($a as $c)if(in_array(strtolower($c),$b))echo $c;?><br />
<br />
ch3ka@bihatsch: wc rot13test.php <br />
1 4 138 rot13test.php<br />
<br />
v2:<br />
<?$f=file($argv[1]);while($a[]=strtolower(next($f))){}while($b[]=str_rot13(next($a))){$c=end($b);if(in_array($c,$a))echo$c;}?><br />
122 Chrs<br />
<br />
==== [[User:Kungi|Kungi]]: Python ====<br />
import sys<br />
e={};a=open(sys.argv[1]).read().lower().split()<br />
for w in a:e[w]=""<br />
for w in a:<br />
b=w.encode('rot13')<br />
if e.has_key(b):e[b]=w<br />
for a,b in e.iteritems():<br />
if b:print a+" -> "+b<br />
<br />
kungi@BeerBook: wc golf2.py (0) <br />
8 23 184 golf2.py<br />
<br />
[[Category:Projekte]]</div>212.202.233.238https://www.noname-ev.de/wiki/index.php?title=Codegolf&diff=2838Codegolf2007-09-18T10:44:43Z<p>212.202.233.238: </p>
<hr />
<div>=== Challenge #1 ===<br />
<SdK> gibts wörter, die nach rot13 n anderes existierendes wort ergeben?<br />
<br />
==== mxf: Perl ====<br />
perl -nle'$w{+lc}=lc}for(keys%w){y/a-z/n-za-m/;$r=$w{$_}&&print"$r -> $_"' /usr/share/dict/web2<br />
<br />
63+2 Zeichen<br />
<br />
==== [[User:PhilFry|PhilFry]]: Ruby ====<br />
ruby -e'words={};IO.readlines(ARGV[0]).each{|w|words[w.downcase.chomp]=true};words.each_key{|w|r=w.tr("a-z","n-za-m");puts w+"->"+r if words[r]}' /usr/share/dict/web2 <br />
<br />
136 Zeichen [[http://phil.idlecrew.de/rot13.txt Ausgabe]]<br />
<br />
real 0m9.114s<br />
user 0m5.692s<br />
sys 0m0.421s<br />
<br />
==== Ch3ka: php ====<br />
<?$a=file('/usr/share/dict/web2');while($b[]=strtolower(str_rot13(next($a)))){}foreach($a as $c)if(in_array(strtolower($c),$b))echo $c;?><br />
<br />
ch3ka@bihatsch: wc rot13test.php <br />
1 4 138 rot13test.php<br />
<br />
v2:<br />
<?$f=file($argv[1]);while($a[]=strtolower(next($f))){}while($b[]=str_rot13(next($a))){$c=end($b);if(in_array($c,$a))echo$c;}?><br />
122 Chrs<br />
<br />
==== [[User:Kungi|Kungi]]: Python ====<br />
import sys<br />
e={};a=open(sys.argv[1]).read().lower().split()<br />
for w in a:e[w]=""<br />
for w in a:<br />
b=w.encode('rot13')<br />
if e.has_key(b):e[b]=w<br />
for a,b in e.iteritems():<br />
if b:print a+" -> "+b<br />
<br />
kungi@BeerBook: wc golf2.py (0) <br />
8 23 184 golf2.py<br />
<br />
[[Category:Projekte]]</div>212.202.233.238https://www.noname-ev.de/wiki/index.php?title=User:Kungi&diff=2172User:Kungi2007-08-06T07:26:12Z<p>212.202.233.238: </p>
<hr />
<div>Hallo Leute ich bin der Kungi,<br />
<br />
momentan studiere ich Anwendungsorientierte Informatik an der Uni Heidelberg.<br />
<br />
jabber-id: kungfoo@jabber.ccc.de<br />
<br />
<br />
http://blogs.noname-ev.de/commandline-tools<br />
http://blogs.noname-ev.de/kungi</div>212.202.233.238https://www.noname-ev.de/wiki/index.php?title=Talk:Main_Page&diff=2171Talk:Main Page2007-08-06T07:22:10Z<p>212.202.233.238: /* Neuer Skin */</p>
<hr />
<div>== Vorschläge für's Wiki ==<br />
<br />
=== Feature Requests ===<br />
<br />
==== Automagisches "Nächstes Treffen" ====<br />
** dafuer! --[[User:CentronX|CentronX]] 16:04, 6 July 2007 (UTC)<br />
<br />
==== SSL Authentication ====<br />
* SSL-Cert-Based login --[[User:ch3ka|ch3ka]]<br />
** qu'est-ce que c'est? --[[User:PhilFry|PhilFry]] 15:58, 6 July 2007 (UTC)<br />
*** Du hast ein Zertifikat im Browser drin, und der Server gleicht das automagisch ab, um Dich als User zu idendifizieren. http://wiki.cacert.org/wiki/ClientCerts --[[User:CentronX|CentronX]] 16:04, 6 July 2007 (UTC)<br />
**** Ok.. Da wäre ich eher für OpenID. Sieht im Moment so aus, als würden das in Zukunft viele Webseiten anbieten. --[[User:PhilFry|PhilFry]] 16:24, 6 July 2007 (UTC)<br />
***** keine Ahnung ob das viel Arbyte ist, sowas ins Mediawiki zu integrieren. --[[User:CentronX|CentronX]] 18:41, 6 July 2007 (UTC)<br />
****** [http://www.mediawiki.org/wiki/Extension:OpenID Mediawiki OpenID Extension] --[[User:PhilFry|PhilFry]] 18:54, 6 July 2007 (UTC)<br />
<br />
==== RSS Import aus dem Blog ====<br />
* Für die News Sektion auf der Hauptseite, schlage ich vor ein Blog zu installieren, dessen RSS Feed wir dann mit [http://www.mediawiki.org/wiki/Extension:GISWiki/RSS Extension:GISWiki/RSS] einbinden. --[[User:PhilFry|PhilFry]] 13:08, 14 July 2007 (UTC)<br />
** Habe die Extension ein bisschen erweitert und den Code aufgeräumt. Unterstützt jetzt dc:creator und dc:date tags, außerdem ist das Layout nicht fest vorgegeben, sondern es werden Mediawiki Templates benutzt. [http://www.mediawiki.org/wiki/Extension:FeedImport MW:Extension:FeedImport] [http://idlecrew.de:2380/svn/public/mediawiki-rss/feedimport/ SVN] [http://wiki.warpcore.ath.cx/mediawiki/index.php/User:PhilFry Beispiel1] [http://wiki.warpcore.ath.cx/mediawiki/index.php/User:PhilFry/BBC Beispiel2] --[[User:PhilFry|PhilFry]] 19:06, 4 August 2007 (UTC)<br />
<br />
==== Neuer Skin ====<br />
Ich bastel gerade einen Skin, basierend auf dem des metalabs. Da das Mediawiki auf meinem Laptop läuft und somit nicht immer erreichbar sein wird, habe ich hier einen Screenshot hochgeladen.<br />
[http://wiki.warpcore.ath.cx/mediawiki/index.php/Main_Page?useskin=ccchd Demowiki] [https://www.noname-ev.de/wiki/uploads/a/a6/Screenshot_New_Theme_1.png Screenshot]<br />
--[[User:PhilFry|PhilFry]] 02:59, 5 August 2007 (UTC)<br />
* SEHR GEIL! ;) --[[User:CentronX|CentronX]] 09:18, 5 August 2007 (UTC)<br />
* Sieht hübsch aus man sollte sich das auf jeden Fall mal in unserem Wiki anschauen [[User:Kungi|Kungi]] 09:21 Montag 6. Aug 2007<br />
<br />
==== Sonstiges ====<br />
* Veranstaltungskalender irgendwie noch mit "aktuelles" mergen? also treffen oder so?<br />
<br />
=== Inspiration ;) ===<br />
** Inhaltlich: [http://wiki.c3d2.de C3D2]<br />
** Design: [http://metalab.at/ Metalabs]<br />
* --[[User:PhilFry|PhilFry]] 11:23, 7 July 2007 (UTC)<br />
<br />
<br />
=== Administratives ===<br />
==== Antispam ====<br />
* Aenderungen am Wiki nur fuer registrierte Benutzer, nicht von IPs aus<br />
** Dagegen. Es gibt imo keinen Grund das Wiki (außer z.B. die Hauptseite) einzuzäunen solange wir keine Probleme mit anonymen Edits haben (Vandalismus, Spam..) --[[User:PhilFry|PhilFry]] 15:58, 6 July 2007 (UTC)<br />
*** Dafür ;). Eben den zweiten Spam gelöscht. --[[User:PhilFry|PhilFry]] 01:31, 5 August 2007 (UTC)<br />
==== Registrierung ====<br />
* Registierung nur mit E-Mail Bestaetigung, nicht einfach so<br />
<br />
So - mehr faellt mir spontan nicht ein. --[[User:CentronX|CentronX]] 15:13, 6 July 2007 (UTC)<br />
<br />
<br />
<br />
== done ==<br />
<br />
* <s>Navigationsleisten (ja, die Idee ist von der UUGRN geklaut) fuer die "Haupt-Seiten" - kann auf [[CentronX' Spielwiese]] bestaunt werden</s><br />
* <s>Eine Vorlage im Sinne von ''aktuelle News'' die fuer jeden registrierten User editierbar ist, und auf der Startseite mit <nowiki>{{foo}}</nowiki> verlinkt ist - so muss die Startseite nicht von jedem editierbar sein, jeder kann aber News einbauen</s><br />
* <s>'''https''' (!) (wobei das ja nix neues ist)</s><br />
* <s>ich kuemmere mich heute erstmal um die Vereins-Blogs --[[User:CentronX|CentronX]] 12:34, 28 July 2007 (UTC)</s></div>212.202.233.238