Test for $req_rec in Embperl

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