[$ var $conf $ar $]
$conf = [+ defined ($conf)?$conf:'
$_[0] = [+ defined ($_[0])?$_[0]:'
$_[1] = [+ defined ($_[1])?$_[1]:'
$rec_rec = [+ $req_rec +]
$$rec_rec = [+ $$req_rec +]
[- $ar = $Embperl::modperlapi >= 2?eval { Apache2::RequestUtil->request }:eval { Apache->request } ; $@ = '' -]
Apache->request = [+ $ar +]
${Apache->request} = [+ $$ar +]
${Apache->request} = $$req_rec ? [+ ($$ar == $$req_rec)?'yes':'no' +]
[+ $req_rec -> filename +]
[+ $ffld[$row] +] [+ $fdat{$ffld[$row]} +]