Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!swrinde!zaphod.mps.ohio-state.edu!magnus.ircc.ohio-state.edu!tut.cis.ohio-state.edu!ucbvax!agate!usenet.ins.cwru.edu!ncoast!allbery From: allbery@NCoast.ORG (Brandon S. Allbery KB8JRR) Newsgroups: comp.lang.perl Subject: Re: Perlscript as login-shell Message-ID: <1991Feb17.171303.20400@NCoast.ORG> Date: 17 Feb 91 17:13:03 GMT References: <11418@jpl-devvax.JPL.NASA.GOV> Reply-To: allbery@ncoast.ORG (Brandon S. Allbery KB8JRR) Followup-To: comp.lang.perl Distribution: comp Organization: North Coast Public Access Un*x (ncoast) Lines: 22 As quoted from <11418@jpl-devvax.JPL.NASA.GOV> by lwall@jpl-devvax.JPL.NASA.GOV (Larry Wall): +--------------- | In 4.0, you can get at this with $^P, the name Perl was invoked by. | There's also $^D to access debug flags, and $^I to access the -i flag, | and I may add $^W to access the -w flag. | | Maybe I should add a flag that makes the tokener accept metacharacters | in place of keywords... :-) :-) :-) +--------------- I've been thinking about the $^x business, Larry. How about changing the special variables to be normally-named variables in package Perl? That way, the debug flags, for example, might be $Perl'debug_flags instead of $^D. It's more readable --- and, much more importantly, you won't run out of variables. ++Brandon -- Me: Brandon S. Allbery VHF/UHF: KB8JRR on 220, 2m, 440 Internet: allbery@NCoast.ORG Packet: KB8JRR @ WA8BXN America OnLine: KB8JRR AMPR: KB8JRR.AmPR.ORG [44.70.4.88] uunet!usenet.ins.cwru.edu!ncoast!allbery Delphi: ALLBERY