On Thursday 06 September 2001 07:15 am, David L. Nicol wrote:
> in file Localmodules.pm:
>
>       use Pollutte::Locally;
>       use Carp;
>
> and in blarf.pl:
>
>       sub Carp {print "outer carp\n"};

        sub frok { Carp(); }

>
>       {
>               use Localmodules.pm;
>               local *{$_} foreach @PolluteList;
>               Pollute();
>               Carp("Inner Carp");     # goes to STDERR

                frok();    # We want this to print "outer carp"

>
>       }
>
>       Carp(); #prints "outer carp\n"
>



-- 
Bryan C. Warnock
[EMAIL PROTECTED]

Reply via email to