Symbol(3pm)
β¨ NAME β¨
okay so bestie, meet Symbol(3pm) from the Perl Programmers Reference Guide: Symbol β manipulate Perl symbols and their names π
π¦ SYNOPSIS π¦
here's the whole vibe check in code, copied exactly so you can trust it:
use Symbol;
$sym = gensym;
open($sym, '<', "filename");
$_ = <$sym>;
# etc.
ungensym $sym; # no effect
# replace *FOO{IO} handle but not $FOO, %FOO, etc.
*FOO = geniosym;
print qualify("x"), "\n"; # "main::x"
print qualify("x", "FOO"), "\n"; # "FOO::x"
print qualify("BAR::x"), "\n"; # "BAR::x"
print qualify("BAR::x", "FOO"), "\n"; # "BAR::x"
print qualify("STDOUT", "FOO"), "\n"; # "main::STDOUT" (global)
print qualify(\*x), "\n"; # returns \*x
print qualify(\*x, "FOO"), "\n"; # returns \*x
use strict refs;
print { qualify_to_ref $fh } "foo!\n";
$ref = qualify_to_ref $name, $pkg;
use Symbol qw(delete_package);
delete_package('Foo::Bar');
print "deleted\n" unless exists $Foo::{'Bar::'};
π DESCRIPTION π
Symbol::gensym creates an anonymous glob and returns a reference to it. That glob reference can be used as a file or directory handle. slay. π
Symbol::ungensym is also provided for backward compatibility with older implementations that didn't support anonymous globs. But bestie, it doesn't do anything. It's literally a no-op. π
Symbol::geniosym creates an anonymous IO handle. You can assign it into an existing glob without affecting the non-IO portions of the glob. Iconic. π
Symbol::qualify turns unqualified symbol names into qualified variable names (e.g. "myvar" -> "MyPackage::myvar"). If it is given a second parameter, qualify uses it as the default package; otherwise, it uses the package of its caller. Regardless, global variable names (e.g. "STDOUT", "ENV", "SIG") are always qualified with "main::". Periodt. β¨
Qualification applies only to symbol names (strings). References are left unchanged under the assumption that they are glob references, which are qualified by their nature. No cap. π¦
Symbol::qualify_to_ref is just like Symbol::qualify except that it returns a glob ref rather than a symbol name, so you can use the result even if use strict 'refs' is in effect. That's the whole point, bestie. π
Symbol::delete_package wipes out a whole package namespace. Heads up: this routine is not exported by default β you may want to import it explicitly. π
π BUGS π
β οΈ okay soSymbol::delete_packageis a bit too powerful. It undefines every symbol that lives in the specified package. Since perl, for performance reasons, does not perform a symbol table lookup each time a function is called or a global variable is accessed, some code that has already been loaded and that makes use of symbols in packageFoomay stop working after you deleteFoo, even if you reload theFoomodule afterwards. It's giving chaos, bestie β be careful. π
mwah π this page is perl v5.42.3, dated 2026-11-03, and it's the Symbol(3pm) manual β bye bestie! π«Άπ
π¦ where this page comes from
- alpine 3.24: perl-doc 5.42.3-r0 Β· Artistic-1.0-Perl OR GPL-1.0-or-later
- π girlified by deepseek-ai/DeepSeek-V4.1-Flash-1017 on : a language model's rewrite of the original, under its terms