You have to compile the input. Try using eval.
It should look something like:
while (STDIN) {
$calc= eval $_;
print $calc.\n;
last;
}
But, don't forget to catch errors.
Sasha
-Original Message-
From: Jacques Lederer [mailto:[EMAIL PROTECTED]]
Sent: Sunday, January 19,
Hello
I defined on sub (say 'foo'), and I have defined 2 alias that point to foo
(say 'boo' and 'zoo'). When I call the either function boo or zoo, I really
enter foo. Is there any way to find out which sub was really called either
'boo' or 'zoo'? I tried using caller, but caller returns foo.