Re: is there internal variable like $0 in perl?

*To*: mathgroup at smc.vnet.net*Subject*: [mg126251] Re: is there internal variable like $0 in perl?*From*: A Retey <awnl at gmx-topmail.de>*Date*: Fri, 27 Apr 2012 06:48:53 -0400 (EDT)*Delivered-to*: l-mathgroup@mail-archive0.wolfram.com*References*: <201204201144.HAA21808@smc.vnet.net> <201204210431.AAA29236@smc.vnet.net> <201204240932.FAA24447@smc.vnet.net> <CAEtRDSdCMKYiHCjKPUQnSPSHMfOnTQW82F3horZaqx5YbQDqdA@mail.gmail.com> <jnb4hb$5eu$1@smc.vnet.net>

Hi Ted, > When I define a new function myFun in a package aaa` I define a variable > me="aaa`myFun". > > BeginPackage["aaa`"] > ... > myFun[]:=Module[{..., me="aaa`myFun"}, > ... > > I wonder Is there an automatic variable, like $0 in perl, which > internally is assigned "aaa`myFun"? no, not AFAIK. What would you use it for? If you want, you can do something like: BeginPackage["aaa`"]; myPublic; Begin["`Private`"]; myPublic[x_] := myPrivate[x]; (me : myPrivate)[x_] := (Print[me]; x^2); End[]; EndPackage[]; then evaluating myPublic[5] will show the information you want. Without knowing what you actually want to achieve I feel that this is probably not really what you need, though... hth, albert

**References**:**Find all roots with FindRoot***From:*Sam Takoy <sam.takoy@yahoo.com>

**Re: Find all roots with FindRoot***From:*"Harvey P. Dale" <hpd1@nyu.edu>

**how to check for NumericQ arbitrary data structure***From:*Ted Sariyski <tsariysk@craft-tech.com>