Jede Zeile muss einen wahren Wert ergeben (Allgemeines zu Perl)

[thread]21675[/thread]

Jede Zeile muss einen wahren Wert ergeben

Tags: perl5 Ähnliche Threads

Leser: 4

Articles: hide open all | hide show old branches

+20 replies
rosti

Gestern 14:32
User since
2011-03-19
3602 Artikel
BenutzerIn
Siehe Thema. Das hat mir mal jemand gesagt, daß in einem Programmcode jede Zeile einen wahren Wert ergeben muss. Also notierte ich, um diese Aussage mal zu prüfen:
Code (perl): (dl )

1 2 3 4

use strict; use warnings; 3 == 4;
Jedoch stört sich der Perl-Interpreter nicht im Geringsten an dieser Unwahrheit. Erklärung?
http://blog.rolfrost.de/

The art of steam.
- +2 replies
- GwenDragon
  
  Gestern 14:59
  User since
  2005-01-17
  14848 Artikel
  Admin1
  3 == 4 evaluiert zu false und das ist bei Perl eben eine leere zeichenkette.
  
  Code: (dl )
  
  1 2 3 4 5
  
  T:\>perl -w -E "say qq(/). (3 == 4) . qq(/)" // T:\>perl -w -E "say qq(/). (3 == 3) . qq(/)" /1/
  
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - rosti
    
    Gestern 15:03
    
    User since
    2011-03-19
    3602 Artikel
    BenutzerIn
    
    Ahh verstehe. Das hatten wir doch schonmal irgendwo, daß false und undef im booleschen Sinne wahr sind.
    
    Danke!
    http://blog.rolfrost.de/
    
    The art of steam.
- +10 replies
- GwenDragon
  
  Gestern 15:35
  
  User since
  2005-01-17
  14848 Artikel
  Admin1
  
  Wieso sollte sich Perl stören? 3 == 4; ist valides Perl.
  
  Quote
  Jede Zeile muss einen wahren Wert ergeben
  Kapiere ich nicht. Und Compiler- und Interpreterbau ist zu lang her bei mir.
  Last edited: 2025-06-14 15:36:49 +0200 (CEST)
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - +9 replies
  - rosti
    
    Gestern 16:05
    
    User since
    2011-03-19
    3602 Artikel
    BenutzerIn
    
    Ganz einfach: Die Aussage daß 3 gleich 4 sein soll, ist meiner Meinung nach nicht wahr.
    http://blog.rolfrost.de/
    
    The art of steam.
    - +8 replies
    - GwenDragon
      
      Gestern 16:23
      
      User since
      2005-01-17
      14848 Artikel
      Admin1
      
      Sicher ist das so.
      
      Was ist dann mit if (0) { ; } Die Zeile liefert ja nun gar keinen logischen Boolschen Wert, und müsste dann deiner Idee nach keinen Wahren Wert ergeben.
      
      Quote
      Jede Zeile muss einen wahren Wert ergeben
      ist seitens deines Bekannten/Kollegen, der sowas sagte, eine falsche Annahme.
      
      Perldoc sagt zu letzten Expression in main() oder einer sub:
      
      Quote
      If no return is found and if the last statement is an expression, its value is returned. If the last statement is a loop control structure like a foreach or a while , the returned value is unspecified. The empty sub returns the empty list.
      
      Last edited: 2025-06-14 16:30:25 +0200 (CEST)
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
      - +7 replies
      - rosti
        
        Gestern 16:33
        
        User since
        2011-03-19
        3602 Artikel
        BenutzerIn
        
        Teste selber:
        
        Code (perl): (dl )
        
        1 2 3
        
        package Dummy; if (0) { ; }
        
        ---> Dummy.pm did not return a true value
        
        Ebenso mit 3 == 4;
        
        Mit der Letzten Zeile 3 == 3; jedoch wird das package angenommen.
        Last edited: 2025-06-14 16:47:26 +0200 (CEST)
        http://blog.rolfrost.de/
        
        The art of steam.
        
        +6 replies
        
        GwenDragon
        
        Heute 09:04
        
        User since
        2005-01-17
        14848 Artikel
        Admin1
        
        Modul? package? Das hattest du nicht in Post #1 erwähnt.
        
        Ein Perl-Modul braucht am Schluss eine 1; damit use/require weiß, dass es korrekt geladen hat.
        
        Ich habe den Zusammenhang zu der Aussage im Startpost nicht verstanden.
        Last edited: 2025-06-15 09:15:51 +0200 (CEST)
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
        
        +5 replies
        
        rosti
        
        Heute 09:48
        
        User since
        2011-03-19
        3602 Artikel
        BenutzerIn
        
        Quote
        Ein Perl-Modul braucht am Schluss eine 1;
        
        Nein. Es braucht einen wahren Wert. 3 == 3 geht ja auch.
        
        mfg
        http://blog.rolfrost.de/
        
        The art of steam.
        
        +4 replies
        
        GwenDragon
        
        Heute 09:55
        
        User since
        2005-01-17
        14848 Artikel
        Admin1
        
        Haarspalterei, was nun alles true ist.
        
        'true' geht auch ;-) https://perlmaven.com/boolean-values-in-perl
        Last edited: 2025-06-15 09:56:17 +0200 (CEST)
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
        
        +3 replies
        
        rosti
        
        Vor 2 Stunden
        
        User since
        2011-03-19
        3602 Artikel
        BenutzerIn
        
        Haarspalterei? Nö. Genau solche Dinge sind immer wieder eine Überlegung wert.
        http://blog.rolfrost.de/
        
        The art of steam.
        
        +2 replies
        
        GwenDragon
        
        Vor 2 Stunden
        
        User since
        2005-01-17
        14848 Artikel
        Admin1
        
        Kennst du auch, oder?
        "0 but true"
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
        
        rosti
        
        Vor 2 Stunden
        
        User since
        2011-03-19
        3602 Artikel
        BenutzerIn
        
        Ja sicher doch. Die Null die wahr ergibt: 0e0
        
        Und irgendwann einmal hatte ich mit Erstaunen festgestellt, daß undef nicht undef ist sondern def(iniert).
        
        mfg
        http://blog.rolfrost.de/
        
        The art of steam.
- +7 replies
- haj
  
  Gestern 19:39
  
  User since
  2015-01-07
  573 Artikel
  BenutzerIn
  
  2025-06-14T12:32:07 rosti
  Das hat mir mal jemand gesagt, daß in einem Programmcode jede Zeile einen wahren Wert ergeben muss.
  
  Man muss keineswegs alles glauben, was mal jemand gesagt hat!
  - +6 replies
  - rosti
    
    Vor 2 Stunden
    
    User since
    2011-03-19
    3602 Artikel
    BenutzerIn
    
    Stimmt. Das betrifft aber auch die perldoc selber.
    
    mfg
    http://blog.rolfrost.de/
    
    The art of steam.
    - +5 replies
    - GwenDragon
      
      Vor 2 Stunden
      
      User since
      2005-01-17
      14848 Artikel
      Admin1
      
      2025-06-15T09:04:56 rosti
      Stimmt. Das betrifft aber auch die perldoc selber.
      Dass was falsch oder unklar erklärt ist? Wo fandest du das?
      Wäre eine Bugmeldung ans CPAN wert.
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
      - +4 replies
      - rosti
        
        Vor 2 Stunden
        
        User since
        2011-03-19
        3602 Artikel
        BenutzerIn
        
        Z.B. die Aussage daß jemand der use bytes verwendet nicht weiß was er tut. Das ist kein Bug sondern einfach nur arrogant.
        http://blog.rolfrost.de/
        
        The art of steam.
        
        +2 replies
        
        GwenDragon
        
        Vor 2 Stunden
        
        User since
        2005-01-17
        14848 Artikel
        Admin1
        
        Dem stimme ich zu. Programmierende blamieren ist überall (nicht nur bei Perl-Communities) eine schlechte Art und respektlos.
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
        
        rosti
        
        Vor 1 Stunde
        
        User since
        2011-03-19
        3602 Artikel
        BenutzerIn
        
        Und ich gebe zu, daß ich jahrelang beim Entwickeln von Webanwendungen die Parameter mit vereinfachten Syntax if( $self->param('num') ) handeln immer ein Problem hatte.
        
        Bis ich dafür sorgte, Nutzdaten und Schlüsselparameter konsequent zu trennen ;)
        Last edited: 2025-06-15 12:39:27 +0200 (CEST)
        http://blog.rolfrost.de/
        
        The art of steam.
        
        barney
        
        Vor 37 Minuten
        
        User since
        2008-08-31
        194 Artikel
        BenutzerIn
        
        Nur weil ich neugierig war, rosti mein wahrscheinlich https://perldoc.perl.org/bytes#NOTICE .

View all threads created Gestern 14:32.