N Zahlen ermitteln mit Gesamtwert 100 (page 5) (Allgemeines zu Perl)

[thread]11787[/thread]

N Zahlen ermitteln mit Gesamtwert 100 (page 5)

Readers: 12

KurtZ

2008-05-12 00:54

User since
2007-12-13
411 articles
BenutzerIn
[default_avatar]

irgendwo hat jemand letztens "Faden" statt "Thread" geschrieben, tust du das auch ???

;-)

Ich denke es kommt darauf an was verständlicher ist, aber ich habe zugegeben beim proggen ständig Probleme mich zu entscheiden ob ich
- englische oder deutsche Bezeichner nehme
- ob ich das konsequent durchziehe
- ob ich den Code deswegen Refactoriere ähm sorry überarbeite.

Nervig finde ich wenn Fremdwörter lateinischen Ursprungs die uns wohlbekannt sind auf einmal angliziert werden.

z.B. Initialisation statt Initialisierung (letzteres kam wahrscheinlich übers Französische zu uns)

Und Englisch ist was Orthografie und Homogenität anbelangt wirklich kein gutes Vorbild...

TMTOWTDYOG (there's more than one way to dig your own grave)

guest Gast

2008-05-12 01:54

Ist doch total cool wenn man so english kann, Da adden einen viele in ihre Userlist. Und wenn man dann auf deren Page surft und einloggt, beposten einen nur Friends, nicht diese ganzen Spambots.
Ich bin immer ganz happy, wenn meinem Job ended, ich homen kann und ich meine mailbox viewe. Dann logge ich mich bei MSN ein und checke welche buddys online sind und mit mir chatten wollen.

guest Gast

2008-05-12 11:02

Ich hab 4096 Widder.

KurtZ

2008-05-15 03:03

User since
2007-12-13
411 articles
BenutzerIn
[default_avatar]

hab mir Gedanken darüber gemacht wie man meinen Algo als Einzeiler hinbekommt:

Code (perl): (dl )

$,="\t";
print map { $y=$x; $x=$_; $x-$y } 
             sort {$a <=> $b} 
                  (100, map {int(rand(100))} (1..4)) ;

allerdings stört mich der Ringtausch im vordersten map { $y=$x; $x=$_; $x-$y }, weiß jemand wie man das einfacher hinbekommt?

Nachtrag: vielleicht wird mein Problem so klarer map { $y=$_-$x ; $x=$_ ; $y } ich würde gerne das $y einsparen

Nachtrag2: kürzer aber unverständlich: map { $y+=$x; $x=$_-$y }

TMTOWTDYOG (there's more than one way to dig your own grave)

Strat

2008-05-16 17:38

User since
2003-08-04
5246 articles
ModeratorIn

KurtZ+2008-05-11 22:54:52--
...
Ich denke es kommt darauf an was verständlicher ist, aber ich habe zugegeben beim proggen ständig Probleme mich zu entscheiden ob ich
- englische oder deutsche Bezeichner nehme
- ob ich das konsequent durchziehe
- ob ich den Code deswegen Refactoriere ähm sorry überarbeite.

Frueher habe ich eigentlich nur auf deutsch entwickelt (kommentare, bezeichner, ...). Irgendwann mal durfte ich ein Perl-Script von etwa 4000 zeilen fixen und erweitern, dessen Bezeichner alle auf Portugisisch waren. Seitdem verwende ich nur noch englische Kommentare (ausser vielleicht hier im Forum) und Bezeichner.

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/

View all threads created 2008-05-10 23:36.