Revision 5494f687
Von Sven Schöling vor etwa 13 Jahren hinzugefügt
| bin/mozilla/oe.pl | ||
|---|---|---|
| 298 | 298 |
my $form = $main::form; |
| 299 | 299 |
my %myconfig = %main::myconfig; |
| 300 | 300 |
my $locale = $main::locale; |
| 301 |
my $cgi = $main::cgi;
|
|
| 301 |
my $cgi = $::request->{cgi};
|
|
| 302 | 302 |
|
| 303 | 303 |
check_oe_access(); |
| 304 | 304 |
|
| ... | ... | |
| 744 | 744 |
my $form = $main::form; |
| 745 | 745 |
my %myconfig = %main::myconfig; |
| 746 | 746 |
my $locale = $main::locale; |
| 747 |
my $cgi = $main::cgi;
|
|
| 747 |
my $cgi = $::request->{cgi};
|
|
| 748 | 748 |
|
| 749 | 749 |
check_oe_access(); |
| 750 | 750 |
|
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.