Thread Rueckgabe von Werten aus HTML-Formular (18 answers)
Opened by ofmueller at 2009-02-11 21:59

ofmueller
 2009-02-12 23:07
#118819 #118819
User since
2009-02-11
2 Artikel
BenutzerIn
[default_avatar]
Danke für das neue Skript. An die Objektorientierung habe ich mich noch nicht heran gewagt. Ich freue mich auch, dass mein Beitrag so eine Reaktion bewirkt hat, wenn auch in eine andere Richtung. (Einsatz von "use warning" bzw. -w)

Ich habe das Skript übernommen und ergänzt - siehe dieses Skript - insbesondere das Hauptprogramm am Ende. Auch hier tritt das Problem auf.

Wenn ich das Skript in meiner IDE laufen lasse, bekomme ich folgenden Hinweis:

[Thu Feb 12 22:04:30 2009] html_objektorientiert.pl: Use of uninitialized value $teste in numeric eq (==) at C:/xampp/cgi-bin/cgi/html_objektorientiert.pl line 48.

Im Browser erscheint das Menü auch doppelt.


Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59

#!/usr/bin/perl
use strict;
use warnings;

use CGI qw(-no_xhtml);
use CGI::Carp qw(fatalsToBrowser);

my $cgi = new CGI;

print $cgi->header();
print $cgi->start_html(-title=>'Vokabeltrainer');

my $teste = eingabe_menue();

print $cgi->p($cgi->b("Eingabe ist: $teste")) if $teste;

print $cgi->end_html;

sub eingabe_menue {
  my $url = $cgi->url;  # Nur zum Testen!
  #my $url = 'http://127.0.0.1/cgi-bin/cgi/woerterbuch3.pl';

  print $cgi->p(
        [ 'Vokabeltrainer',
          '**************',
          'Menue', 
          '1 Vokabeln eingeben',
          '2 Englisch - Deutsch',
          '3 Deutsch - Englisch',
          '4 Programmende' 
        ] 
    ),
    $cgi->start_form(-action=>$url),
    $cgi->p('Auswahl:'),
    $cgi->textfield(-name=>'eingabe', -value=>'', -size=>1),
    $cgi->submit(-name=>'submit', value=>'Abschicken'),
    $cgi->endform,
    $cgi->p('');

  my $eing = $cgi->param('eingabe');
  return $eing;
}

1;

$teste = eingabe_menue;

        if ($teste == 1)
        {
                print "eingabe_vokabeln";
        }
        elsif ($teste == 2)
        {
                print "englisch_deutsch";
        }
        elsif ($teste == 3)
        {       
        print "deutsch_englisch";
        }

View full thread Rueckgabe von Werten aus HTML-Formular