Re: Perl script: where was I executed from?

Hi,

I am not sure that I completely understand your question (for example,
what does it mean to run a script "dynamically or not").  You could
retrieve the list of processes from OS to try to figure out how was the
script ran, but it is a bit messy.  Just maybe: maybe you want to see
whether the script is printing to a terminal or not and which terminal.
For example, something like:

 if (-t STDOUT) { print "this is tty\n" }
 else           { print "not tty\n" }

will give different output when you run directly in terminal, or if you
redirect the standard output to a file.


On Sat, 21 Nov 2020, wagsworld48 via beginners wrote:

> The only problem I was trying to determine was could i know if I was running from BBEdit dynamically or not? That
> was the question. No problem, just could I know what environment I was running in. The output was a the Unix output
> log which up to the last update automatically came to the front of the BBEdit windows. No longer does. Whether it is
> Perl or another scripting language, I was trying to make it easier as one tested.
> 
> So that is what I was after... ;)
> 
> WagsWorld World of Perl
> Hebrews 4:15
> Ph D:(408)914-1341
> Ph M:(408)761-7391
> On Nov 21, 2020, 21:10 -0800, Uri Guttman <[email protected]>, wrote:
>       On 11/21/20 10:32 PM, [email protected] wrote:
>             Well, up until this last update is BBEdit, when a script was run while
>             in BBEdit, the Unix log file would automatically come to the fore
>             front. Now it stays hidden.
> 
> 
>       that doesn't sound like a perl problem. what log file? there are many on
>       a unix system. and why/how would a log file come to the front? it would
>       have to be open in some program.
> 
>             A gentleman on the BBEdit mail list gave anΒ  Β osasctipt that one can
>             execute from within the script bring executed. But sometimes I run
>             from terminal session, so donΒ’t want to tell BBEdit to do something is
>             not required. Hence where am I and from that know what to do...
> 
>       again, i don't see the actual problem you are having. is it really a
>       perl issue? would the problem exist if you did your program in another
>       language? that is a good question to determine if it is a language vs
>       system issue. i don't see a perl problem in your comments.
> 
>       thanx,
> 
>       uri
> 
> 
>

-- 
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
http://learn.perl.org/