[EMAIL PROTECTED] wrote: > Is there anyway in Perl to determine which program called a perl script? > > Program A, runs script 1, script 1 prints, Running from Program A > > Program B, runs script 1, script 1 prints, Running from Program B
Depends on what you mean by run (system, ``, call included script, etc). Most likely the easiest way would be to pass an arg to the callee that tells who the caller is. -- ,-/- __ _ _ $Bill Luebkert Mailto:[EMAIL PROTECTED] (_/ / ) // // DBE Collectibles Mailto:[EMAIL PROTECTED] / ) /--< o // // Castle of Medieval Myth & Magic http://www.todbe.com/ -/-' /___/_<_</_</_ http://dbecoll.tripod.com/ (My Perl/Lakers stuff) _______________________________________________ Perl-Unix-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
