seltsame Methodenparameter mit MooseX::Declare (gelöst) (Fragen zu Perl-Modulen)

[thread]18581[/thread]

seltsame Methodenparameter mit MooseX::Declare [gelöst]

Tags: perl5 Ähnliche Threads

Leser: 12

Articles: hide open all | hide show old branches

+6 replies
lichtkind

2013-09-11 18:17
User since
2004-03-22
5730 Artikel
ModeratorIn + EditorIn
Hai,

meine methode
Code (perl): (dl )

method wechsle_liste ($gewaehlte_liste) {
hat einen parameter der selsame werte empfängt. Ich match da was und gebe $1 als parameter und bekomme inhalte wie "coerce" und anderes(is_subtype_of), die nach interner moose messages klingen. nur wenn ich '' übergebe ist alles gut. Und ich hab typ des parameters auf str , any und auch optional gestellt. ändert nichts.
Last edited: 2013-09-11 18:33:10 +0200 (CEST)
mein zeug:, Leute

Es beginnt immer mit einer Entscheidung.
- +5 replies
- pq
  
  2013-09-11 18:28
  
  User since
  2003-08-04
  12209 Artikel
  Admin1
  
  übergib mal "$1" statt $1 als parameter.
  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: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
  - +4 replies
  - lichtkind
    
    2013-09-11 18:32
    
    User since
    2004-03-22
    5730 Artikel
    ModeratorIn + EditorIn
    
    und wenn mir noch sagts warum das geht kriegst extrabienchen, ne im ernst ich dachte ich hab echt ahnung von perl und dann das :)
    
    Vielen Dank
    mein zeug:, Leute
    
    Es beginnt immer mit einer Entscheidung.
    - +3 replies
    - pq
      
      2013-09-11 18:39
      
      User since
      2003-08-04
      12209 Artikel
      Admin1
      
      das ist eine kleine falle =)
      bei jedem weiteren erfolgreichen match mit captures wird $1 neu gesetzt. bevor du den parameter aus @_ herausholst, ist es ein alias auf $1.
      ich vermute, das modul macht da irgendeine regex in der sub, bevor dein code aufgerufen wird.
      dasselbe kannst du aber auch mit einer beliebigen variable $x nachstellen, die du in der sub am anfang veränderst, wenn diese in der sub gültig ist.
      
      beispiel:
      
      Code: (dl )
      
      1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
      
      perl -wE' "test" =~ m/(e)/; # $1 = e foo($1); sub foo { "bla" =~ m/(a)/; $1 = a my ($param) = @_; say $param; } my $x = 23; bar($x); sub bar { $x++; my ($param) = @_; say $param; } ' a 24
      
      mit der übergabe von "$1" wird ein neuer string erzeugt, und der hat keinen bezug mehr zu $1.
      Last edited: 2013-09-11 18:40:39 +0200 (CEST)
      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: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
      - pq
        
        2013-09-11 18:47
        
        User since
        2003-08-04
        12209 Artikel
        Admin1
        
        eine weitere ähnliche falle:
        
        Code: (dl )
        
        1 2 3 4 5 6 7
        
        perl -wE' my $string = "test"; $string =~ m/(e)/g; # $1 = e $string = "TEST"; say $1; ' E
        
        $1 ist da kein wirklicher string, sondern sowas wie eine referenz auf den gematchten teilstring. wenn der originalstring sich verändert, sieht man das bei der ausgabe von $1
        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: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
      - lichtkind
        
        2013-09-11 19:27
        
        User since
        2004-03-22
        5730 Artikel
        ModeratorIn + EditorIn
        
        stimmt, so weit hatte ich nicht gedacht. Eigentlich ist $ ein heimlicher deref op :)
        mein zeug:, Leute
        
        Es beginnt immer mit einer Entscheidung.

View all threads created 2013-09-11 18:17.