DestE (1.2.2) | 2008-09-07 18:31 |
DestR (1.2) | 2006-08-29 13:30 |
DestR-TC (1.2) | 2006-08-13 22:02 |
DestR-TC2 (1.1.1) | 2008-02-20 01:08 |
other (1) | 2006-05-22 21:44 |
require 'ebs_sub1.cgi';
一般系OSS require 'dest_ebs_convert.cgi'; 管理系OSS require 'admin_de_convert.cgi';
@pair = split(/;/, $ENV{'HTTP_COOKIE'}); foreach (@pair) {my($key, $value) = split(/=/, $_);$DUMMY{$key} = $value;} @pairs = split(/,/, $DUMMY{EB}); foreach (@pairs) {my($key, $value) = split(/:/, $_);$COOKIE{$key} = $value;}変更後
&get_cookie; %COOKIE = %cookie;
crypt ($FORM{'pass'},eb);変更後
crypt ($FORM{'pass'},dest);
&LOCK; &UNLOCK;変更後
&Lock; &UnLock;