Thread Link nach Formulareingabe
(21 answers)
Opened by Drain at 2003-08-25 18:33
Kannst Du einiges kürzer schreiben:
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 #! /usr/bin/perl -w use strict; use diagnostics; use warnings; use CGI; use CGI::Carp qw(fatalsToBrowser); my $cgi = CGI->new(); my %params = $cgi->Vars(); #damit hast Du schon mal das parsen der Eingaben gespart... my $test = 0; # ??? ich versteh nicht so ganz was das soll, übernehme es aber von dir... if($test != 0){ # kann bei deinem Skript allerdings nie passieren print $cgi->header(-type => 'text/html', -status => '200 OK'); print "Ausgabe...."; } else{ print $cgi->redirect(-url => "http://www.perl-community.de"); } my $sendmail = '/usr/bin/sendmail'; #...usw. ... Edit: alles in Code-Tags gepackt...\n\n <!--EDIT|renee|1061908014--> 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/ |