Opened by Rambo at 2004-05-08 17:59
User since
2003-08-04
771 Artikel
HausmeisterIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-08-04
771 Artikel
HausmeisterIn
Das erste Mal von Perl gehört hab ich, als ich meinen Bruder fragte, was er für Programmiersprachen kennt..
Angefangen Perl zu programmieren hab ich erst viel später. Um genau zu sein am 17. Feb 2002 (+- 2 Tage). Und zwar hab ich unmittelbar nach Facharbeitsabgabe wieder mal programmieren wollen. Hab aber damals keinen Turbo Pascal-Compiler für Linux gefunden (Windows ließ sich nicht mehr bei mir installieren.. der Umstieg war also nicht 100% freiwillig, aber ich bereue ihn nicht, doch das ist eine andere Geschichte). Ich kam aber noch nicht auf die Idee mal die Programmiersprache zu wechseln.
Allerdings hab ich mich im Laufe der ersten nach-Facharbeitswoche aufs Meistern von Vampire (Rollenspiel) vorbereitet. Dazu suchte ich einige Tibetische Wörter bei Google. Ich hab ewig (mehrere Tage lang) nichts gefunden und irgendwo in der Ergebnisliste von Google war auch perl.de. Ich erinnerte mich ganz vage, daß das ja ne Programmiersprache sei und schaute mich dann mal so aus Neugier um. Am gleichen Tag hab ich mich angemeldet und mein erstes Perlscript geschrieben.
Angefangen Perl zu programmieren hab ich erst viel später. Um genau zu sein am 17. Feb 2002 (+- 2 Tage). Und zwar hab ich unmittelbar nach Facharbeitsabgabe wieder mal programmieren wollen. Hab aber damals keinen Turbo Pascal-Compiler für Linux gefunden (Windows ließ sich nicht mehr bei mir installieren.. der Umstieg war also nicht 100% freiwillig, aber ich bereue ihn nicht, doch das ist eine andere Geschichte). Ich kam aber noch nicht auf die Idee mal die Programmiersprache zu wechseln.
Allerdings hab ich mich im Laufe der ersten nach-Facharbeitswoche aufs Meistern von Vampire (Rollenspiel) vorbereitet. Dazu suchte ich einige Tibetische Wörter bei Google. Ich hab ewig (mehrere Tage lang) nichts gefunden und irgendwo in der Ergebnisliste von Google war auch perl.de. Ich erinnerte mich ganz vage, daß das ja ne Programmiersprache sei und schaute mich dann mal so aus Neugier um. Am gleichen Tag hab ich mich angemeldet und mein erstes Perlscript geschrieben.
sub z{if(@_){1while$x[$k=rand 10];t($t=$x[$k]=1)}print map"$z[$x[$_]]$_".($_%3?
"":"\n"),1..9}sub t{$j=0;$x[$_+1]==$t&&($j+=2**$_)for 0..8;z,die"Gewinner $z[$t]
"if grep$_==($j&$_),7,56,73,84,146,273,292,448;z,die"Gleichstand\n"if@x>9&&!grep
!$_,@x}@x=4;@z=qw{. [ (};z$^T&1;while(<>){next if$_>9||$x[$_];t$t=$x[$_]=2;z 1}
"":"\n"),1..9}sub t{$j=0;$x[$_+1]==$t&&($j+=2**$_)for 0..8;z,die"Gewinner $z[$t]
"if grep$_==($j&$_),7,56,73,84,146,273,292,448;z,die"Gleichstand\n"if@x>9&&!grep
!$_,@x}@x=4;@z=qw{. [ (};z$^T&1;while(<>){next if$_>9||$x[$_];t$t=$x[$_]=2;z 1}