Unless (Seite 2) (Allgemeines zu Perl)

J-jayz-Z

2005-07-11 19:00

User since
2005-04-13
625 Artikel
BenutzerIn

Es wäre dann aber doch sicher ein leichter irgendwie ein elsless oder so etwas mit in die Standartdistribution zu bringen, wenn es inter sowieso gedreht wird, oder?
Ich selbst habe auch schon öfters gemerkt, das es nicht toll as sieht, wenn man unless nutzt aber elsif negieren muss, um das selbe Verhalten zu erzeugen...

perl -Mstrict -Mwarnings -e 'package blub; sub new { bless {} } sub bar {my $self=shift; $self->{bla}="5065726c2d436f6d6d756e697479"; return $self->{bla};} my $foo=blub->new();print "Hallo ";print pack("H*",$foo->bar()); print "\n"'

http://perl-tutor.de

pq

2005-07-11 19:34

User since
2003-08-04
12209 Artikel
Admin1

es geht um lesbarkeit. elsless ist nicht mehr lesbar IMHO.

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem

J-jayz-Z

2005-07-11 19:42

User since
2005-04-13
625 Artikel
BenutzerIn

War ja auch nur eine idee...
Wenn ich mir die Namen für die Funktionen ausdenken müsste, würden einige anderst heißen ^^

perl -Mstrict -Mwarnings -e 'package blub; sub new { bless {} } sub bar {my $self=shift; $self->{bla}="5065726c2d436f6d6d756e697479"; return $self->{bla};} my $foo=blub->new();print "Hallo ";print pack("H*",$foo->bar()); print "\n"'

http://perl-tutor.de

ptk

2005-07-11 22:04

User since
2003-11-28
3645 Artikel
ModeratorIn
[default_avatar]

elsif ist logisch (kurz fuer "else if") aber elsless? "else less" ist sinnlos.

Crian

2005-07-12 15:11

User since
2003-08-04
5873 Artikel
ModeratorIn

wieso? sonst weniger SCNR =)

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

J-jayz-Z

2005-07-12 16:12

User since
2005-04-13
625 Artikel
BenutzerIn

Das war wohl wieder so ein insider, hab ich nicht verstanden ^^

perl -Mstrict -Mwarnings -e 'package blub; sub new { bless {} } sub bar {my $self=shift; $self->{bla}="5065726c2d436f6d6d756e697479"; return $self->{bla};} my $foo=blub->new();print "Hallo ";print pack("H*",$foo->bar()); print "\n"'

http://perl-tutor.de

renee

2005-07-12 16:24

User since
2003-08-04
14371 Artikel
ModeratorIn

Crian hat nur "else less" wörtlich übersetzt...

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

J-jayz-Z

2005-07-12 17:03

User since
2005-04-13
625 Artikel
BenutzerIn

schon kar, ich meinte das SCNR *g
Ich lebe noch nicht so lang "online" .. ^^

EDIT: Typo...\n\n

perl -Mstrict -Mwarnings -e 'package blub; sub new { bless {} } sub bar {my $self=shift; $self->{bla}="5065726c2d436f6d6d756e697479"; return $self->{bla};} my $foo=blub->new();print "Hallo ";print pack("H*",$foo->bar()); print "\n"'

http://perl-tutor.de

renee

2005-07-12 17:11

User since
2003-08-04
14371 Artikel
ModeratorIn

SCNR = "Sorry, could not resist"

OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/

J-jayz-Z

2005-07-12 18:16

User since
2005-04-13
625 Artikel
BenutzerIn

Okay, danke :D
So eine Datenbank mit den Begriffen wäre ganz praktisch ^^

perl -Mstrict -Mwarnings -e 'package blub; sub new { bless {} } sub bar {my $self=shift; $self->{bla}="5065726c2d436f6d6d756e697479"; return $self->{bla};} my $foo=blub->new();print "Hallo ";print pack("H*",$foo->bar()); print "\n"'

http://perl-tutor.de