On 25 Jun 2001 09:47:08 -0800, Michael Fowler wrote:
> On Mon, Jun 25, 2001 at 01:09:51PM -0400, Chas Owens wrote:
> > On 25 Jun 2001 12:57:39 -0400, Yacketta, Ronald wrote:
> > > > select count(distinct(process)) ACTIVE from " . 'v$session' . "
>
> > > > select count(distinct(process)) ACTIVE from " . 'v\$session' . "
> >
> > What version of Perl are you using? I was certain the 'v$session' would
> > not interpolate. Have I failed to understand how quoting works in Perl?
> > can someone tell me where my understanding has failed?
>
> It hasn't, 'v$session' won't be interpolated by Perl; this is the way
> interpolation (or non-interpolation) has worked in Perl from at least perl
> 4. My guess is the database itself is interpolating the variable.
>
>
> Michael
> --
> Administrator www.shoebox.net
> Programmer, System Administrator www.gallanttech.com
> --
Well if that is the case then the original code should work
if you add an additional "\\" to it:
@active = qx(
sqlplus -S $RTDUSER/$RTDPASS\@$RTD_ORACLE_SID <<-!
select count(distinct(process)) ACTIVE from v\\\$session
where last_call_et < 60 and
process in (select ltrim(rtrim(to_char(process_id) )) from
session_list);
quit
!
--
Today is Sweetmorn, the 30th day of Confusion in the YOLD 3167
All Hail Discordia!