Thread Problem mit if-Anweisung und allgemeine Fragen zu Perl (15 answers)
Opened by TheMic at 2009-12-29 10:43

renee
 2009-12-29 10:52
#129751 #129751
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
1.) Du machst einen numerischen Vergleich. Schalte mal "warnings" mit use warnings; ein. Dann solltest Du eine Warnung bekommen, dass $Titelselect nicht numerisch ist. Strings werden dabei zu 0 evaluiert (mit der Ausnahme wenn der String mit einer Zahl anfängt). Das passiert auch mit Deinem Leerstring. Damit wird aus Deinem Vergleich ein "0 == 0", was ja wahr ist.

2.) Indem Du der Subroutine Parameter übergibst...

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
sub eins {
    my $x = 124;
    zwei( $x );
}

sub zwei {
    my ($x_zwei) = @_;
    print $x_zwei;
}


Natürlich kann man auch mit "globalen" Variablen arbeiten, was aber nicht so schön ist.
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/

View full thread Problem mit if-Anweisung und allgemeine Fragen zu Perl