1
0
Fork 0
mirror of https://github.com/perlbot/perlbuut synced 2025-06-07 10:45:40 -04:00

Fix Linux::Seccomp polluting the namespace

This commit is contained in:
Ryan Voots 2017-03-29 17:28:26 -04:00
parent 90c7e35d4a
commit b60a1f1a51

View file

@ -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