Path: ...!2.eu.feeder.erje.net!3.eu.feeder.erje.net!feeder.erje.net!usenet.goja.nl.eu.org!dotsrc.org!filter.dotsrc.org!news.dotsrc.org!not-for-mail
Date: Tue, 13 May 2025 12:18:16 -0400
MIME-Version: 1.0
User-Agent: Mozilla Thunderbird
Subject: Re: Capturing DCL output in symbol
Newsgroups: comp.os.vms
References: <87zfflxmbu.fsf@lucy.meyer21c.net>
 <87v7q9xf02.fsf@lucy.meyer21c.net> <vvqt4d$jomf$1@dont-email.me>
Content-Language: en-US
From: =?UTF-8?Q?Arne_Vajh=C3=B8j?= <arne@vajhoej.dk>
In-Reply-To: <vvqt4d$jomf$1@dont-email.me>
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 8bit
Lines: 26
Message-ID: <682370c7$0$716$14726298@news.sunsite.dk>
Organization: SunSITE.dk - Supporting Open source
NNTP-Posting-Host: 5690d565.news.sunsite.dk
X-Trace: 1747153096 news.sunsite.dk 716 arne@vajhoej.dk/70.172.216.99:54959
X-Complaints-To: staff@sunsite.dk
Bytes: 1780

On 5/11/2025 3:17 PM, Craig A. Berry wrote:
> On 5/9/25 11:32 PM, David Meyer wrote:
>> I found that one way to do it is to put all the processing that uses the
>> command output inside subshells in the same PIPE command.
>>
>> One shortcoming of this method is that it's very easy to go over the
>> maximum command element length allowed inside the PIPE. For my
>> procedure, I was able to get around this by choosing lexical functions
>> to minimize the length of the PIPE command.
>>
>> Any other way to do this?
> 
> It's pretty easy with Perl:
> 
> $ perl -"MVMS::DCLsym" -e "$x=`show time`; VMS::DCLsym->setsym('mysym', 
> $x, 'GLOBAL');"
> $ SHOW SYMBOL mysym
>    MYSYM == "   11-MAY-2025 14:10:89."

You can probably code a word processor as a one liner
in Perl ...

:-) :-) :-)

Arne