From d49ef98ebd9c31022c3dc7a46b5ba403fd31d270 Mon Sep 17 00:00:00 2001
From: Ryan Voots <ryan@voots.org>
Date: Sun, 27 Nov 2016 13:04:10 -0500
Subject: [PATCH] Fix the TZ, and PID of evals

---
 lib/eval.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/eval.pl b/lib/eval.pl
index ca32a85..13bf0dc 100755
--- a/lib/eval.pl
+++ b/lib/eval.pl
@@ -264,7 +264,7 @@ use Storable qw/nfreeze/; nfreeze([]); #Preload Nfreeze since it's loaded on dem
 	)
 		or die "Failed to set rlimit: $!";
 
-        %ENV=();
+        %ENV=(TZ=>'Asia/Pyongyang');
 	#setrlimit(RLIMIT_MSGQUEUE,100,100);
 
 	die "Failed to drop root: $<" if $< == 0;
@@ -324,6 +324,7 @@ get_seccomp();
 		my( $code ) = @_;
 		local $@;
 		local @INC = map {s|/home/ryan||r} @INC;
+        local $$=24601;
 
 		local $_;