Thread JavaScript in Perl übersetzen (52 answers)
Opened by Nicki271 at 2008-06-23 09:29

renee
 2008-06-24 10:10
#111400 #111400
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Gast+2008-06-24 06:43:01--
$input = <STDIN>;

print "Geben Sie eine Zahl ein : \n";

* Du solltest Wiki:use strict verwenden
* Diese beiden Zeilen solltest Du tauschen, sonst kommt die Aufforderung nachdem der User etwas eingegeben haben muss.
Quote
b = 2;
Variablen haben in Perl ein "Sigil", mit dem angezeigt wird, um was es sich handelt. "Einfache" Variablen (sog. Skalare) haben ein "$" vorne angestellt, wie Du es bei $input gemacht hast.

Quote
if ("a" / "b" = 0)
Hier versuchst Du den Buchstaben a durch den Buchstaben b zu teilen. Vermutlich nicht ganz was Du willst. Und dann veruchst Du diesem Ausdruck auch noch den Wert 0 zuzuweisen.

Auch hier wieder: Variablen haben Sigils!

Wenn Du überprüfen willst, ob etwas durch zwei teilbar ist (und das ohne "Rest"), dann musst Du den Modulo-Operator nehmen (%). Und zur Überprüfung musst Du einen Vergleichsoperator nehmen (hier: ==).

Also:
Code (perl): (dl )
if( $a % $b == 0 )


Weiterhin ist in $a nix gespeichert, da Du weiter oben $input verwendet hast.
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 JavaScript in Perl übersetzen