Zahlen ausschreiben (solved) (Allgemeines zu Perl)

[thread]20124[/thread]

Zahlen ausschreiben [solved]

Tags: perl5 Similar Threads

Readers: 19

Articles: hide open all | hide show old branches

+18 replies
bianca

2016-07-27 09:16

User since
2009-09-13
7016 articles
BenutzerIn

Guten Morgen!

Gibt es eine Möglichkeit Perl V >= 5.18.4 zu zwingen, eine kleine Zahl nicht mit e-... abzukürzen ohne sie groß zu rechnen?
Ich meine damit, dass say .00002 nicht 2e-005 sondern .00002 raus schreibt. Das wird für die Speicherung von Zahlen gebraucht und an der Stelle verwirren diese e-... Werte.

Danke
10 print "Hallo"
20 goto 10
- +3 replies
- Muffi
  
  2016-07-27 09:36
  
  User since
  2012-07-18
  1465 articles
  BenutzerIn
  
  sprintf ?
  1 + 1 = 10
  - +2 replies
  - bianca
    
    2016-07-28 07:02
    User since
    2009-09-13
    7016 articles
    BenutzerIn
    
    Die Lösung müsste variabel sein. Ich habe das hier versucht:
    
    Code (perl): (dl )
    
    1 2
    
    my $anz = 5; say sprintf('%0'.$anz.'d',.00002);
    
    Zeigt leider 00000. Wie kann man das variabel nutzen?
    10 print "Hallo"
    20 goto 10
    - FIFO
      
      2016-07-28 07:48
      
      User since
      2005-06-01
      469 articles
      BenutzerIn
      
      %d ist für integer-Werte, Du musst %f (float) verwenden (s.u.)
      Everyone knows that debugging is twice as hard as writing a program in the first place. So if you're as clever as you can be when you write it, how will you ever debug it? -- Brian Kernighan: "The Elements of Programming Style"
- +3 replies
- guest janus
  
  2016-07-27 09:57
  
  Wenn Du speichern willst, dann nimm doch gleich pack() mit der richtigen Schablone. Der pack()-Funktion ist die Schreibweise egal.
  Last edited: 2016-07-27 10:05:45 +0200 (CEST)
  - +2 replies
  - bianca
    
    2016-07-28 06:59
    
    User since
    2009-09-13
    7016 articles
    BenutzerIn
    
    pack() benutze ich bisher nur, um aus einem String ein Array zu machen. Die Doku zum Kommando ist ein Roman. Kannst du mir bitte ein Stichwort zuwerfen, wonach ich schauen muss?
    10 print "Hallo"
    20 goto 10
    - guest janus
      
      2016-07-28 14:16
      
      pack() erzeugt kein Array sondern eine Bytesequenz mit infolge Schablone genau definierter Länge.
      
      Wie lang eine Bytesequenz je nach Schablone ist guckst Du perldoc:
      http://handwerkzeugs.de/perldoc.html?f=pack
      Last edited: 2016-07-28 14:27:21 +0200 (CEST)
- +11 replies
- GwenDragon
  
  2016-07-27 10:00
  
  User since
  2005-01-17
  14850 articles
  Admin1
  
  http://perldoc.perl.org/functions/sprintf.html#spr...
  
  perl -e "printf '%f',.00002" 0.000020
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - +10 replies
  - bianca
    
    2016-07-28 06:58
    
    User since
    2009-09-13
    7016 articles
    BenutzerIn
    
    2016-07-27T08:00:20 GwenDragon
    perl -e "printf '%f',.00002" 0.000020
    
    Wieso zeigt das ausgerechnet 6 Nachkommastellen an? Also wieso 6 und nicht 9 oder 3?
    Ich bräuchte eine Lösung wo ich die Anzahl Nachkommastellen als Variable angeben kann.
    10 print "Hallo"
    20 goto 10
    - +9 replies
    - FIFO
      
      2016-07-28 07:26
      
      User since
      2005-06-01
      469 articles
      BenutzerIn
      
      Code (perl): (dl )
      
      1 2 3
      
      my $decimals = 3; printf( "%.${decimals}f", 1/3 );
      
      Die {} um den Variablennamen musst Du setzen, sonst versucht Perl, eine Variable $decimalsf zu interpolieren.
      Last edited: 2016-07-28 07:28:42 +0200 (CEST)
      Everyone knows that debugging is twice as hard as writing a program in the first place. So if you're as clever as you can be when you write it, how will you ever debug it? -- Brian Kernighan: "The Elements of Programming Style"
      - bianca
        
        2016-07-28 08:16
        
        User since
        2009-09-13
        7016 articles
        BenutzerIn
        
        Vielen Dank, das ist es!
        Und ich hab es sogar kapiert :=)
        10 print "Hallo"
        20 goto 10
      - +7 replies
      - renee
        
        2016-07-28 08:54
        
        User since
        2003-08-04
        14371 articles
        ModeratorIn
        
        Dafür gibt es den *: sprintf "%.*f", 3, 1/3. Der * wird durch die 3 ersetzt, damit ergibt sich sprintf "%.3f", 1/3
        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/
        
        +5 replies
        
        bianca
        
        2016-07-28 12:12
        
        User since
        2009-09-13
        7016 articles
        BenutzerIn
        
        Ist eine dieser Varianten nicht aufwärtskompatibel in Richtung Perl 6?
        10 print "Hallo"
        20 goto 10
        
        Muffi
        
        2016-07-28 13:21
        
        User since
        2012-07-18
        1465 articles
        BenutzerIn
        
        Also da die Sternchen-Syntax sogar in Delphi so 1:1 funktioniert würd ich sagen relativ verbreitet.
        1 + 1 = 10
        
        +3 replies
        
        GwenDragon
        
        2016-07-28 14:29
        
        User since
        2005-01-17
        14850 articles
        Admin1
        
        Die *-Syntax ist auch in C++' sprintf drin. Siehe http://linux.die.net/man/3/sprintf
        Dann sollte das bei Perl auch so sein.
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
        
        +2 replies
        
        Raubtier
        
        2016-07-28 22:18
        
        User since
        2012-05-04
        1081 articles
        BenutzerIn
        
        GwenDragon
        Die *-Syntax ist auch in C++' sprintf drin.
        
        Naja, sprintf ist nicht wirklich C++, sondern schon C ohne ++.
        
        Gut, man kann in C++ auch diese C-Funktionen nutzen, aber der C++-Weg geht eigentlich über die Header <iostream> und <iomanip> (printf etc. ist in <cstdio>, das steht ja auch explizit für C Standard Input and Output Library).
        
        Man hätte in C++ also eher sowas:
        
        Code: (dl )
        
        std::cout << std::setprecision(5) << std::fixed << 0.00002 << "\n";
        
        GwenDragon
        
        2016-07-29 10:46
        
        User since
        2005-01-17
        14850 articles
        Admin1
        
        Stimmt, C++ <> C. Auch wenn C als Sprachsubset samt Libraries in C++ verwendet wird.
        Meine Dusseligkeit.
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
        
        bianca
        
        2016-07-29 07:36
        
        User since
        2009-09-13
        7016 articles
        BenutzerIn
        
        Danke euch, ich hab das übernommen!
        10 print "Hallo"
        20 goto 10

View all threads created 2016-07-27 09:16.