Testskript zum Testen ob Dateien ohne Warning kompilieren (Allgemeines zu Perl)

[thread]21684[/thread]

Testskript zum Testen ob Dateien ohne Warning kompilieren

Tags: perl5 Testskript Similar Threads

Readers: 7

Articles: hide open all | hide show old branches

+7 replies
barney

2025-07-28 15:57

User since
2008-08-31
213 articles
BenutzerIn

Hallo,

aktuelle benutze ich in https://github.com/RotherOSS/otobo/blob/rel-10_0/s... die Module Test::Compile::Internal und Test::Strict. Damit teste ich:
* ob die Code-Dateien strict aktivieren
* ob die Code-Dateien warnings akivieren
* ob die Code-Datein kompilieren

Kennt jemand ein Modul mit dem ich checken kann ob die Dateien ohne Warnungen kompilieren?
- +2 replies
- rosti
  
  2025-07-28 20:16
  
  User since
  2011-03-19
  3660 articles
  BenutzerIn
  
  perl -c macht nur eine Syntaxprüfung. Vielleicht ist das was für Dich, MFG
  http://blog.rolfrost.de/
  
  The art of steam.
  - barney
    
    2025-07-29 00:14
    
    User since
    2008-08-31
    213 articles
    BenutzerIn
    
    Dieser Hinweis hat mir nicht geholfen.
- +4 replies
- haj
  
  2025-07-29 12:12
  User since
  2015-01-07
  581 articles
  BenutzerIn
  Vielleicht sowas wie Test::Warnings?
  
  Beispiel: Das Folgende, nennen wir es Experiment.pm, wirft eine Warnung "class is experimental".
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7
  
  use 5.038; use feature 'class'; class C { } 1;
  
  Der folgende Test warnings.t fängt das:
  
  Code (perl): (dl )
  
  1 2 3 4 5
  
  use Test::Warnings; use Experiment; done_testing;
  
  Ergibt:
  
  Code: (dl )
  
  1 2 3 4
  
  class is experimental at /tmp/Experiment.pm line 4. not ok 1 - no (unexpected) warnings (via done_testing) # Failed test 'no (unexpected) warnings (via done_testing)' # at /tmp/warnings.t line 8.
  
  Die Magie liegt hier in done_testing, das einen Testfall mehr generiert. In Tests mit Zählung der Tests passiert die Magie im END-Block, der Testfall muss dann mitgezählt werden. Da gibt es auch ein Beispiel in der Dokumentation.
  - +3 replies
  - barney
    
    2025-07-29 13:31
    
    User since
    2008-08-31
    213 articles
    BenutzerIn
    
    Ja, Test::Warnings hatte ich mir auch angeschaut. Ich werde das in Zukunft in die OTOBO Testskripte einbauen, https://github.com/RotherOSS/otobo/issues/4537 .
    
    Es ist nicht ganz das was ich eigentlich suche, ich will ja durch die Perl-Dateien durchgehen und schaun ob `perl -cw` Warnungen ausspuckt.
    - +2 replies
    - haj
      
      2025-07-29 22:08
      
      User since
      2015-01-07
      581 articles
      BenutzerIn
      
      2025-07-29T11:31:42 barney
      Es ist nicht ganz das was ich eigentlich suche, ich will ja durch die Perl-Dateien durchgehen und schaun ob `perl -cw` Warnungen ausspuckt.
      
      Dazu fällt mir Capture::Tiny ein: Du kannst mit capture_stderr die Warnungen abfangen, da muss dann ein A.pm syntax OK drinstehen - und sonst nix.
      
      Den Text der Warnung muss man eh anschauen. Wenn A.pm eine Warnung ausspuckt, dann kommt die auch für alle Dateien, die use A.pm ausführen.
      - barney
        
        2025-07-30 09:57
        
        User since
        2008-08-31
        213 articles
        BenutzerIn
        
        Das ist wie es in der OTOBO CodePolicy gemacht wird. Nur dass man anno dazumal bei OTRS versucht hat möglichst wenig CPAN Module zu verwenden, und deshalb ein explizites open verwendet hat.
        
        Wenn ich mal Leerlauf habe dann mache ich einen Patch für Test::Compile. Dort sollen dann die Warnungen von perl -cw gecheckt werden. Dann auch Optionen für Blacklist und Whitelist welche Warnungen relevant sind.

View all threads created 2025-07-28 15:57.