Opened by Auctioneer at 2013-01-03 21:49
Hallo zusammen,
eingebaut, getetstet, Resultat: Fehler weg.
Neues Problem:
Hier sollte doch meiner unmassgeblichen Meinung nach, FORM initialisiert werden.
Sämtliche elsif Zeilen sind davon betroffen.
?
Ernie
Last edited: 2013-01-04 01:10:44 +0100 (CET)
eingebaut, getetstet, Resultat: Fehler weg.
Neues Problem:
Code: (dl
)
Use of uninitialized value $form{"action"} in string eq at auct.pl line 291 (#1)Hier sollte doch meiner unmassgeblichen Meinung nach, FORM initialisiert werden.
Code: (dl
)
1
2
3
4
5
6
#!/usr/local/bin/perl
use CGI::Carp qw(fatalsToBrowser);
BEGIN { open (STDERR, ">/home/j/www/whoever/cgi-bin/e/error.txt"); }
use vars qw(%config %category %form);
use strict;
use diagnostics;
Sämtliche elsif Zeilen sind davon betroffen.
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
#-#############################################
local %form = &get_form_data;
if ($form{'action'} eq 'new') { &new; } ## Zeile 291
elsif ($form{'action'} eq 'repost') { &new; }
elsif ($form{'action'} eq 'procnew') { &procnew; }
elsif ($category{$form{'category'}}) { &displist; }
..
..
..
else { &dispcat; } ## Zeile 309
#-#############################################
?
Ernie
Last edited: 2013-01-04 01:10:44 +0100 (CET)