perl-community.de T-shirts (Seite 15) (Sonstige Beiträge (auch Spaß und Sinnloses))

havi

2003-09-03 13:49

User since
2003-08-04
2036 Artikel
BenutzerIn

Hi @all!

Was haltet ihr von der Idee T-shirts von der Community anfertigen zu lassen ?

Mein Vorschlag fuer den Aufdruck: ist hier zu sehen

mfg havi

Perl-Zeitung - http://perl-zeitung.at/
Perl-Blog - http://usr-bin-perl.blogspot.com/

Antworten mit Zitat

havi

2003-09-03 15:36

User since
2003-08-04
2036 Artikel
BenutzerIn

[quote=snadra,03.09.2003, 13:30]Den Camel Code gibt es hier:
http://www.perlmonks.org/index.pl?node_id=45213
Aber ich weiß nicht ob es OK ist, den einfach zu benutzen. Habe ihn gerade auch auf dem Rücken, allerdings ist das Shirt von Thinkgeek[/quote]
Müsste man auf jeden Fall fragen ob man den Code benutzen darf, glaub aber ehrlich gesagt nicht das da jemand etwas dagegen hat!

mfg havi

Perl-Zeitung - http://perl-zeitung.at/
Perl-Blog - http://usr-bin-perl.blogspot.com/

Antworten mit Zitat

havi

2003-09-04 10:23

User since
2003-08-04
2036 Artikel
BenutzerIn

[quote=renee,04.09.2003, 08:16]Die Diskussion um das Copyright war schon letztes mal da. Irgendwas muss man ja dazuschreiben, wegen Urheberrecht...[/quote]
Das weiß ich schon aber gefallen tut es mir eben nicht!

mfg havi

Perl-Zeitung - http://perl-zeitung.at/
Perl-Blog - http://usr-bin-perl.blogspot.com/

Antworten mit Zitat

Crian

2003-09-05 19:10

User since
2003-08-04
5873 Artikel
ModeratorIn

Leider fallen T-Shirts total unterschiedlich aus, manchmal schlabbert L, manchmal sitzt XL viel zu eng :-|
Poloshirt wär auch interessant.

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

Antworten mit Zitat

[E|B]

2003-09-06 17:58

User since
2003-08-08
2561 Artikel
HausmeisterIn

XXXL????
Bist du dick oder einfach nur groß?!

Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

Antworten mit Zitat

[E|B]

2003-09-08 22:37

User since
2003-08-08
2561 Artikel
HausmeisterIn

[quote=wozki,08.09.2003, 18:52]Könnte mal jemand kurz alles zusammenfassen, wie das Shirt aussehen soll, Kosten, usw.?[/quote]
Im Prinzip das selbe, wie im alten Board (du erinnerst dich bestimmt noch an den Perl T-Shirt Thread! *gg*). Genau das selbe wird hier auch besprochen nur das havi jetzt bei O'Reilly angefragt hat, ob wir den Kamel Code haben können. Eine Antwort haben wir leider noch keine.

Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

Antworten mit Zitat

havi

2003-09-09 22:10

User since
2003-08-04
2036 Artikel
BenutzerIn

[quote=Thorium,06.09.2003, 20:09]BTW:

http://www.heise.de/newsticker/data/nij-08.03.01-000/

Code (perl): (dl )

#!/usr/bin/perl -w
# 531-byte qrpff-fast, Keith Winstein and Marc Horowitz <sipb-iap-dvd@mit.edu>
# MPEG 2 PS VOB file on stdin -> descrambled output on stdout
# arguments: title key bytes in least to most-significant order
&#36_='while(read+STDIN,&#36_,2048){&#36a=29;&#36b=73;&#36c=142;&#36t=255;@t=map{&#36_%16or&#36t^=&#36c^=(
&#36m=(11,10,116,100,11,122,20,100)[&#36_/16%8])&110;&#36t^=(72,@z=(64,72,&#36a^=12*(&#36_%16
-2?0:&#36m&17)),&#36b^=&#36_%64?12:0,@z)[&#36_%8]}(16..271);if((@a=unx"C*",&#36_)[20]&48){&#36h
=5;&#36_=unxb24,join"",@b=map{xB8,unxb8,chr(&#36_^&#36a[--&#36h+84])}@ARGV;s/...&#36/1&#36&/;&#36
d=unxV,xb25,&#36_;&#36e=256|(ord&#36b[4])<<9|ord&#36b[3];&#36d=&#36d>>8^(&#36f=&#36t&(&#36d>>12^&#36d>>4^
&#36d^&#36d/8))<<17,&#36e=&#36e>>8^(&#36t&(&#36g=(&#36q=&#36e>>14&7^&#36e)^&#36q*8^&#36q<<6))<<9,&#36_=&#36t[&#36_]^
((&#36h>>=8)+=&#36f+(~&#36g&&#36t))for@a[128..&#36#a]}print+x"C*",@a}';s/x/pack+/g;eval