about summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rwxr-xr-xara.pl8
1 files changed, 7 insertions, 1 deletions
diff --git a/ara.pl b/ara.pl
index d55fdfc..4df7f72 100755
--- a/ara.pl
+++ b/ara.pl
@@ -9,7 +9,13 @@ use Text::ASCIITable;
 use Getopt::Long qw( GetOptions );
 use JSON::MaybeXS qw( decode_json );
 
-use OpenBSD::Unveil;
+use constant is_OpenBSD => $^O eq "openbsd";
+if (is_OpenBSD) {
+    require OpenBSD::Unveil;
+    OpenBSD::Unveil->import;
+} else {
+    sub unveil { return 1; }
+}
 
 # Unveil @INC.
 foreach my $path (@INC) {