Zwei Befehle in einem (gelöst) (Allgemeines zu Perl) - Perl-Community.de

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

2025-11-08 14:22:05
Europe/Berlin
Einloggen (Registrieren)
- Einstellungen
- Statistics
Jemand zu Hause?
2 Benutzer online
4 Gäste

[thread]17130[/thread]

submit to reddit

Zwei Befehle in einem [gelöst]

[gelöst]

Tags: perl5 Ähnliche Threads

Leser: 16

Articles: hide open all | hide show old branches

+3 replies
bianca

2012-02-03 17:39
User since
2009-09-13
7016 Artikel
BenutzerIn
Kurze Frage:
Code (perl): (dl )

1 2 3 4 5 6 7 8 9

#!/usr/bin/perl use strict; use warnings; my $test2; my $test = 'foo' . (1==1 ? 'bar' && $test2 = 2 : '') ; print "$test\n$test2\n";
Code: (dl )

1 2 3

d:>perl test.pl foo2 2
$test2 ist richtig aber für $test erwarte ich 'foobar' und nicht 'foo2'.
Ist die Syntax falsch oder meine Denkweise? Kann man in dieser Art "zwei Sachen in einem" machen?
Danke euch
10 print "Hallo"
20 goto 10
- +2 replies
- pq
  
  2012-02-03 17:52
  User since
  2003-08-04
  12209 Artikel
  Admin1
  Code (perl): (dl )
  
  1 2
  
  my $test = 'foo' . (1==1 ? 'bar' && $test2 = 2 : '');
  
  das ist dasselbe wie
  
  Code (perl): (dl )
  
  1 2
  
  my $test = 'foo' . (1==1 ? ('bar' && $test2 = 2) : '');
  
  $test wird also auf 'foo' plus den rückgabewert von 'bar' && $test2 = 2 gesetzt, und der ist 2.
  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
  - bianca
    
    2012-02-03 17:59
    
    User since
    2009-09-13
    7016 Artikel
    BenutzerIn
    
    Geht also nicht. Dachte ich mir. Ist nicht schlimm, hätte ich "perlig" gefunden, wenn es gegangen wäre :)
    Danke dir.
    10 print "Hallo"
    20 goto 10

View all threads created 2012-02-03 17:39.