Eine Lösungsmöglichkeit (solved) (Perl/CGI)

[thread]19962[/thread]

Eine Lösungsmöglichkeit [solved]

Tags: perl5 CGI Similar Threads

Readers: 15

Articles: hide open all | hide show old branches

Subtree:
Eine Lösungsmöglichkeit (1 article) 2016-01-23 11:17

+2 replies

GwenDragon

2016-01-22 15:17

User since
2005-01-17
14936 articles
Admin1

Ich erbarme mich.
Folgendes CGI-Perl-Programm beinhaltet einiges.
Du musst noch für andere Operatoren erweitern und das HTML ein bisschen patchen.
Den Rest kannst du bestimmt. ;)

Du kannst das Programm als Taschenrechner.pl speichern. Es erstellt sowohl das Formular, berechnet und gibt auch Ergebnis aus.

Code (perl): (dl )

use strict; 
use warnings;

use CGI ();

my $cgi = CGI::new;
my $zahl1 = $cgi->param('Zahl1');
my $zahl2 = $cgi->param('Zahl2');
my $operator = $cgi->param('Rechenart');
my $ergebnis; 

print $cgi->header();

print <<HTML;
<html>
<body>
HTML

if (length($zahl1) and length($zahl2) and length($operator)) {
  $ergebnis = 'NaN';
  
  # berechne je nach Operator
  $ergebnis = $zahl1 * $zahl2 if $operator eq '*';
  # und weitere .... wie für * nur mit anderem Operator hier einfügen
  
  print "<p>Das Ergebnis von $zahl1 $operator $zahl2 ist $ergebnis</p>";
}
else {  
  print <<HTML;
<form action="#" method="post">
<p>Zahl 1: <input size="4" maxlength="3" name="Zahl1">
<br>
Zahl 2: <input size="4" maxlength="3" name="Zahl2">
<br>
Rechenart: <input size="2" maxlength="3" name="Rechenart">
<br>
<input type="SUBMIT" value="Berechnen">
</p>
</form>
HTML
}

print <<HTML;
</body>
</html>
HTML

Editiert von GwenDragon: fehlendes Semicolon gefixt
Last edited: 2016-01-23 11:17:57 +0100 (CET)

die Drachin Gwen

Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

Muffi

2016-01-22 15:46

User since
2012-07-18
1465 articles
BenutzerIn

Trick17b könnte sein im HTML beim Formular ein Target mitzugeben.

<form action="fuzzlbar.pl" method="post" target="ergebnis">

und dann ein iframe mit dem Namen Ergebnis in den Taschenrechner, dann muss man sich nicht um das ganze HTML kümmern, sondern nur die Zahl rausschreiben.
1 + 1 = 10

View all threads created 2016-01-22 13:26.