Lines Matching refs:qualify
21 print qualify("x"), "\n"; # "Test::x"
22 print qualify("x", "FOO"), "\n" # "FOO::x"
23 print qualify("BAR::x"), "\n"; # "BAR::x"
24 print qualify("BAR::x", "FOO"), "\n"; # "BAR::x"
25 print qualify("STDOUT", "FOO"), "\n"; # "main::STDOUT" (global)
26 print qualify(\*x), "\n"; # returns \*x
27 print qualify(\*x, "FOO"), "\n"; # returns \*x
51 C<Symbol::qualify> turns unqualified symbol names into qualified
53 second parameter, C<qualify> uses it as the default package;
62 C<Symbol::qualify_to_ref> is just like C<Symbol::qualify> except that it
86 @EXPORT = qw(gensym ungensym qualify qualify_to_ref);
117 sub qualify ($;$) {
136 return \*{ qualify $_[0], @_ > 1 ? $_[1] : caller };