http://qs321.pair.com?node_id=724756


in reply to Finding what args were passed to the perl interpretter ?

Well, you'd have to map the code that gets displayed back to the relevant commandline args, but you could use B::Deparse:

ben@Tyr:~$ perl -MO=Deparse -wle# BEGIN { $^W = 1; } BEGIN { $/ = "\n"; $\ = "\n"; } -e syntax OK

Note that the above 'BEGIN' statements differ from actual 'BEGIN' blocks: those are shown as 'sub BEGIN'.


--
"Language shapes the way we think, and determines what we can think about."
-- B. L. Whorf