my $level = shift;
my $file = shift;
- open (FILE, "<$file") || die "can't open $file: $!";
+ if ($file =~ "/sys/kernel/debug/.*") {
+ print("ignoring file $file\n");
+ return 0;
+ }
+ if ($file =~ "/sys/kernel/security/apparmor/revision") {
+ print("ignoring file $file\n");
+ return 0;
+ }
+
+ if (!open (FILE, "<$file")) {
+ print STDERR "can't open $file: '$!'\n";
+ return 0;
+ }
my $value;
{ local $/;