Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re^4: Test if STDOUT is attached to console or shell redirected filehandle

by liverpole (Monsignor)
on Sep 09, 2009 at 17:10 UTC ( [id://794407]=note: print w/replies, xml ) Need Help??


in reply to Re^3: Test if STDOUT is attached to console or shell redirected filehandle
in thread Test if STDOUT is attached to console or shell redirected filehandle

Interesting!

In Windows (ActiveState v5.10.0) doing it this way "works":

type highlight.pl | perl highlight.pl

Doing it this way does not:

type highlight.pl | highlight.pl

s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://794407]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others learning in the Monastery: (5)
As of 2024-04-25 08:43 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found