On 25 Jun 2001 12:15:15 -0400, Yacketta, Ronald wrote:
<snip />
> this is what I am trying todo
>
> @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
> !
> );
<snip />
How about:
{
my $temp = "
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
!
);
@active = `$temp`;
}
--
Today is Sweetmorn, the 30th day of Confusion in the YOLD 3167
All Hail Discordia!
