commit - 95cbc4cddd9df603bd20f2ff988a949f1e0ecebc
commit + 7b8263f50909ea7b97af29e5d0257ac08c89d17e
blob - ec998e658ae70f4563baf20f9c63779585bf1529
blob + 03afb9468b6e39ee10a428cbf24726c20484d0d8
--- smingest
+++ smingest
use Date::Parse;
use File::Basename;
-use OpenBSD::Pledge;
-use OpenBSD::Unveil;
-
die "usage: $0 dbpath\n" if @ARGV != 1;
my $dbpath = shift @ARGV;
open(my $sqlite, "|-", "/usr/local/bin/sqlite3", $dbpath)
or die "can't spawn sqlite3";
-unveil("/usr/local/bin/mshow", "rx") or die "unveil mshow: $!";
-pledge("stdio proc exec") or die "pledge: $!";
+if (`uname` =~ "OpenBSD") {
+ use OpenBSD::Pledge;
+ use OpenBSD::Unveil;
+ unveil("/usr/local/bin/mshow", "rx") or die "unveil mshow: $!";
+ pledge("stdio proc exec") or die "pledge: $!";
+}
+
say $sqlite ".import --csv /dev/stdin email"
or die "can't speak to sqlite: $!";