Thread 0 als Parameter prüfen (10 answers)
Opened by pktm at 2009-12-21 21:12

sid burn
 2009-12-22 16:46
#129614 #129614
User since
2006-03-29
1520 Artikel
BenutzerIn

user image
Wobei MooseX::Declare gleich noch schöner wäre:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
use MooseX::Declare;

class Test {
  sub test (Defined $i) {
    return "$i ist immer ein definierter Wert";
  }

  sub test2 (Int $i) {
    return "$i ist immer ein Integer\n";
  }
}

my $obj = Test->new;

say $obj->test('abc');   # ok
say $obj->test(0);       # ok
say $obj->test(undef);   # nok
say $obj->test;          # nok

say $obj->test2('abc');   # nok
say $obj->test2(0);       # ok
say $obj->test2(undef);   # nok
say $obj->test2;          # nok


Und mit MooseX::MultiMethods wird Perl dann langsam sogar wieder eine halbwegs Moderne Sprache.
Last edited: 2009-12-22 16:51:38 +0100 (CET)
Nicht mehr aktiv. Bei Kontakt: ICQ: 404181669 E-Mail: perl@david-raab.de

View full thread 0 als Parameter prüfen