Stringoperation in for-Schleife (gelöst) (Allgemeines zu Perl) - Perl-Community.de

Start · Board · Anwendungen/Programme/Skripte in Perl · Allgemeines zu Perl

2025-10-27 21:21:42
Europe/Berlin
Einloggen (Registrieren)
- Einstellungen
- Statistics
Jemand zu Hause?
0 Benutzer online

[thread]19131[/thread]

submit to reddit

Stringoperation in for-Schleife [gelöst]

[gelöst]

Tags: perl5 string for-schleife Ähnliche Threads

Leser: 13

Articles: hide open all | hide show old branches

+9 replies
cohama

2014-06-04 11:49
User since
2011-08-16
102 Artikel
BenutzerIn
Hallo zusammen,

ich habe folgendes Problem zu lösen. Ich muss in einer for-Schleife zwei Strings zu einem neuen zusammen setzen, dabei kommt stets raus diese Ergebnis raus:
Code: (dl )

1 2

Variable4 _Variable3
Die for-Schleife
Code: (dl )

1 2 3 4 5 6 7 8

for($ct=0;$ct<=0;$ct++){ $Variable1 = $Array[$ct]; $Variable2 = $Array2[$ct]; $Variable3 = "11"; $Variable4 = $Variable1; $Variable5 = $Variable4."_".$Variable3; print "$Variable5"; }
Es soll $Variable5=$Variable4_$Variable3 raus kommen.
Last edited: 2014-06-04 11:52:18 +0200 (CEST)
- +4 replies
- pq
  
  2014-06-04 12:04
  
  User since
  2003-08-04
  12209 Artikel
  Admin1
  
  du hast vergessen, ein beispiel-@Array zu posten.
  
  und du solltest ein tutorial lesen, das dir beibringt, variablen mit my zu deklarieren.
  http://perl-tutorial.org/
  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
  - +3 replies
  - cohama
    
    2014-06-04 13:32
    User since
    2011-08-16
    102 Artikel
    BenutzerIn
    
    Hallo zusammen,
    
    hier ein paar Beispiel des Array:
    
    Code: (dl )
    
    1 2 3 4 5 6 7 8 9 10
    
    8994399107 8994399108 8994399109 8994399110 8994399111 8994399112 8994399113 8994399114 8994399115 8994399116
    - pq
      
      2014-06-04 13:50
      
      User since
      2003-08-04
      12209 Artikel
      Admin1
      
      das ist ein text mit mehreren zeilen, kein array.
      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
    - Linuxer
      
      2014-06-04 13:50
      
      User since
      2006-01-27
      3891 Artikel
      HausmeisterIn
      
      Und wie kommen die Daten in den Array?
      
      Es wurde ja schon von murphy erwähnt, dass die Vermutung nahe liegt, dass die Daten aus einer Datei in einen Array gelesen werden und die Zeilenumbrüche NICHT entfernt werden.
      Damit endet $Variable4 mit einem Zeilenumbruch, der auch beim Zusammensetzen mit "_" und $Variable3 erhalten bleibt.
      
      Entferne die Zeilenumbrüche aus Deinem Daten-Array.
      meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
      Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
- murphy
  
  2014-06-04 12:05
  User since
  2004-07-19
  1776 Artikel
  HausmeisterIn
  2014-06-04T09:49:49 cohama
  [...]
  Es soll $Variable5=$Variable4_$Variable3 raus kommen.
  
  Dann schreib doch einfach
  
  Code (perl): (dl )
  
  $Variable5 = "${Variable4}_${Variable3}";
  
  Der Code, den Du gepostet hast, sieht zwar viel umständlicher als nötig aus und hat keine sehr sprechenden Variablennamen, scheint aber funktional korrekt zu sein.
  
  Das Ergebnis hängt halt davon ab, was in @Array drinsteht. Meine Glaskugel sagt mir, dass @Array irgendwelche eingelesenen Daten enthält, in denen Zeilenumbrüche vorkommen, welche Du vergessen hast mittels chomp oder ähnlicher Maßnahmen zu entfernen.
  When C++ is your hammer, every problem looks like your thumb.
- Linuxer
  
  2014-06-04 13:55
  User since
  2006-01-27
  3891 Artikel
  HausmeisterIn
  Schau Dir doch mal Dein Daten-Array genauer an:
  
  Code: (dl )
  
  1 2 3
  
  # hier wird irgendwo @Array befüllt; und dann: require Data::Dumper; print Data::Dumper->new( [ \@Array ], [ '*Array' ] )->Useqq(1)->Dump();
  
  meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
  Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
- Muffi
  
  2014-06-04 14:02
  User since
  2012-07-18
  1465 Artikel
  BenutzerIn
  2014-06-04T09:49:49 cohama
  
  Code: (dl )
  
  1 2
  
  Variable4 _Variable3
  
  Es soll $Variable5=$Variable4_$Variable3 raus kommen.
  
  Das ist doch das was rauskommt?
  Nur mit Zeilenumbruch drin. Wird wohl in einer Deiner Variablen ein Zeilenumbruch sein.
  
  PS: Ich würd for($ct=0;$ct<=0;$ct++){ nicht Schleife nennen ;)
  1 + 1 = 10
- GwenDragon
  
  2014-06-04 15:36
  User since
  2005-01-17
  14868 Artikel
  Admin1
  Die for-Schleife hat seltsame Parameter. $ct ist 0 beim Start, deine Schleifenlaufbedingung $ct<=0 ist dann aber schon problematisch, denn $ct wird dann nie größer als 0!
  
  Code (perl): (dl )
  
  1 2 3
  
  for($ct=0;$ct<=0;$ct++){ ... }
  
  bedeutet im Endeffekt:
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7
  
  $ct = 0; while ($ct <= 0) { irgendein_code(); nochwas(); $ct++; }
  
  Last edited: 2014-06-04 15:37:36 +0200 (CEST)
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View all threads created 2014-06-04 11:49.