Help for this page

Select Code to Download


  1. or download this
    *{"${callpkg}::$sym"} =
                $type eq '&' ? \&{"${pkg}::$sym"} :
    ...
                $type eq '%' ? \%{"${pkg}::$sym"} :
                $type eq '*' ?  *{"${pkg}::$sym"} :
                do { require Carp; Carp::croak("Can't export symbol: $type
    +$sym") };