Revision 5494f687
Von Sven Schöling vor etwa 13 Jahren hinzugefügt
bin/mozilla/admin.pl | ||
---|---|---|
33 | 33 |
#====================================================================== |
34 | 34 |
|
35 | 35 |
use DBI; |
36 |
use CGI; |
|
37 | 36 |
use Encode; |
38 | 37 |
use English qw(-no_match_vars); |
39 | 38 |
use Fcntl; |
... | ... | |
68 | 67 |
$::lxdebug->enter_sub; |
69 | 68 |
my $session_result = shift; |
70 | 69 |
|
71 |
$cgi = $::cgi; |
|
72 | 70 |
$form = $::form; |
73 | 71 |
$locale = $::locale; |
74 | 72 |
$auth = $::auth; |
Auch abrufbar als: Unified diff
$::cgi entfernt.
Verfahren:
- Für alle Vorkommen von "my $cgi = $::cgi;":
ersetzt durch my $cgi = $::request->{cgi}->new({}) ersetzt
- Wenn in einer Datei alle my $cgi rausgefallen sind auch use CGI entfernt.
- Initialisierung von $::cgi in scripts und Dispatcher entfernt und in dei
Initialisierung von $::request eingebaut.
- cgi aus der Liste der kanonischen globals genommen.
Zu CGI:
- CGI::func und CGI->func sind beides valide Werte, sind aber intern buggy wie
Hölle. CGI:: erzeugt ein Dummyobjekt mit CGI->new, und klobbert damit
cookies. CGI-> ist noch schlimmer und ruft ${CGI}->{.cookies} auf.
- CGI->new({}) ist schneller als CGI->new(''), deshalb habe ich diese version genommen.
Auf meinem Rechner schafft die erste Version etwa 32k/s, die zweite 28k/s.
- CGI kompiliert benötigte Funktionen beim ersten Aufruf über AUTOLOAD.
- cookie benötigen ein $cgi Objekt.