Staticke promenne v baliku

[Vavruska Jindrich]

Chtel bych se zeptat nekoho chytreho co si mysli o nasledujicim napadu:

na web serveru je mod_perl, pres ktery bezi nejaka intranetova aplikace
(napr. administrativni zpracovani objednavek). Je potreba, aby uzivatele
meli pristup k databazi a system, aby byl schopen uchovat stav jejich
prace.

V Perlu bude existovat nejaky modul volany z formularu tech uzivatelu. V
tomto modulu bude jeden staticky hash, ktery bude udrzovat perzistentni
zalezitosti... napr.

####################################
package Zpracovani::Objednavek;

use CGI::Apache;
use DBI;

%session = { } ;

### tady by byly sub-y ########

# napr. Zpracovani::Objednavek::delete( <session>, <z jake tabulky>,
<podminka>)

sub delete {
    my ($session_id, $table, $where) = @_ ;
    my $db_connection = $session->{$session_id}->{DATABASE} ;
    # ... nejaky deletovaci sql ...
}

###

Vim, ze se tohle moc nedoporucuje, ale pripada mi to nejjednodussi.