mirror of
https://github.com/perlbot/perlbuut
synced 2025-06-07 16:55:42 -04:00
Fix Linux::Seccomp polluting the namespace
This commit is contained in:
parent
90c7e35d4a
commit
b60a1f1a51
1 changed files with 2 additions and 2 deletions
|
@ -56,7 +56,7 @@ $|++;
|
|||
#*STDOUT = $stdh;
|
||||
|
||||
sub get_seccomp {
|
||||
use Linux::Seccomp ':all';
|
||||
use Linux::Seccomp ;
|
||||
my $seccomp = Linux::Seccomp->new(SCMP_ACT_KILL);
|
||||
##### set seccomp
|
||||
#
|
||||
|
@ -74,7 +74,7 @@ sub get_seccomp {
|
|||
|
||||
my $rule_add = sub {
|
||||
my $name = shift;
|
||||
$seccomp->rule_add(SCMP_ACT_ALLOW, syscall_resolve_name($name), @_);
|
||||
$seccomp->rule_add(SCMP_ACT_ALLOW, Linux::Seccomp::syscall_resolve_name($name), @_);
|
||||
};
|
||||
|
||||
$rule_add->(write => [0, '==', 2]); # STDERR
|
||||
|
|
Loading…
Add table
Reference in a new issue