Frage zu einer Schleife (Allgemeines zu Perl)

[thread]20181[/thread]

Frage zu einer Schleife

Tags: perl5 Ähnliche Threads

Leser: 14

Articles: hide open all | hide show old branches

+6 replies
jan99

2016-10-26 08:00
User since
2008-09-18
439 Artikel
BenutzerIn
Moin!

ich habe folgende Schleife:
Code (perl): (dl )

1 2 3 4 5 6 7 8 9 10

# Zeichnen der Linien print "osm_id4node: ".$osm_id4node."\n"; $osm_id4way--; for (my $i = -1; $i <= $osm_id4node; -2){ print "i: ".$i."\n"; print $fh " <way id=\"".$osm_id4way."\" action='modify' visible='true'>\n"; print $fh " <nd ref=\"".$i."\" />\n"; print $fh " <nd ref=\"".($i - 1)."\" />\n"; print $fh " </way>\n"; }
Diese wird aber nicht im inneren Teil erreicht, obwohl für $osm_id4node der Wert -42 vorliegt.

Es sollte für $i die Werte -1, -3,.... ausgewertet werden.

Zusätzlich habe ich die Meldung

Quote
Useless use of a constant (-2) in void context at osm-grid.pl line 124.

bekommen - das ist der Anfang der Schleife - was hätte ich da besser machen können?

Gruß Jan
perl-Greenhorn - Win7 64bit / strawberry (ehem. activeperl) - www.OpenStreetMap.de
- +3 replies
- Muffi
  
  2016-10-26 08:14
  
  User since
  2012-07-18
  1465 Artikel
  BenutzerIn
  
  Er sagt dir doch eigentlich recht schön was ihn stört.
  
  Du hast in der Schleife ein "-2" und er hat keine Ahnung was er damit tun soll.
  Lies halt durch wie die Schleife funktioniert.
  
  edit: ohne dein Programm genauer angeschaut zu haben: Soll es vielleicht
  $i -= 2 sein? edit2: Obwohl das wohl, wenn ich mir die ersten beiden Parameter anguck eine Endlosschleife wird
  Last edited: 2016-10-26 08:23:17 +0200 (CEST)
  1 + 1 = 10
  - +2 replies
  - jan99
    
    2016-10-26 08:25
    
    User since
    2008-09-18
    439 Artikel
    BenutzerIn
    
    Moin!
    
    danke erst einmal für die Rückmeldung.
    
    Es soll die Schleife solange durchlaufen werden, mit dem Startwert $i=-1, wie $i kleiner gleich $osm_id4node ist und die Schrittweiter soll -2 sein!
    
    Hilft das weiter?
    
    Gruß Jan
    perl-Greenhorn - Win7 64bit / strawberry (ehem. activeperl) - www.OpenStreetMap.de
    - Muffi
      
      2016-10-26 08:27
      
      User since
      2012-07-18
      1465 Artikel
      BenutzerIn
      
      Also du startest mit -1 und ziehst so lange 2 ab, bis die Zahl größer als eine andere wird?
      Ich war ja jetzt nie das große Mathegenie, aber das musst du mir genauer erklären wie das passieren kann.
      1 + 1 = 10
- +2 replies
- GwenDragon
  
  2016-10-26 08:28
  
  User since
  2005-01-17
  14754 Artikel
  Admin1
  
  Die Schleife braucht als dritten Parameter eine Anweisung (keien Konstante!) zum Ändern des Schleifenzählers
  http://perldoc.perl.org/perlsyn.html#For-Loops
  
  Und dein Abbruchtest (mittleren Parameter) in der for-Schleife ist falsch. Es muss dann >= sein.
  
  Geht so in der Konsole:
  # ~ perl -E "$osm_id4node=-42; for (my $i = -1; $i >= $osm_id4node; $i += -2){ say $i }" -1 -3 -5 -7 -9 -11 -13 -15 -17 -19 -21 -23 -25 -27 -29 -31 -33 -35 -37 -39 -41
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - jan99
    
    2016-10-26 09:35
    
    User since
    2008-09-18
    439 Artikel
    BenutzerIn
    
    danke Euch allen!
    
    Gruß Jan
    perl-Greenhorn - Win7 64bit / strawberry (ehem. activeperl) - www.OpenStreetMap.de

View all threads created 2016-10-26 08:00.