░▒▓████████████████████████████████▓▒░ ░▒▓█ ▓▒░ ░▒▓█ ~ S W A M P ~ ▓▒░ ░▒▓█ ▓▒░ ░▒▓████████████████████████████████▓▒░
pplmvsvm
LOCATION:
/usr/lib/x86_64-linux-gnu/perl-base/warnings
☗ ROOT
↻ REFRESH
✎ CARVE FLESH
EDITING: register.pm
package warnings::register 1.05; require warnings; # left here as cruft in case other users were using this undocumented routine # -- rjbs, 2010-09-08 sub mkMask { my ($bit) = @_; my $mask = ""; vec($mask, $bit, 1) = 1; return $mask; } sub import { shift; my @categories = @_; my $package = caller; warnings::register_categories($package); warnings::register_categories($package . "::$_") for @categories; } 1; __END__
CANCEL
Name
Type
Size
Modified
Actions
↩ ..
DIR
—
—
📄 register.pm
PM
462 B
2026-06-12 13:42
EDIT