diff --git a/run.pl b/run.pl
index fe1bc35..1b3bd7a 100755
--- a/run.pl
+++ b/run.pl
@@ -1,9 +1,22 @@
 #!/usr/bin/env perl
 
 use v5.40.0;
-
 use strict;
 use warnings;
 
-chdir '/app/Hiperthermia/';
-require '/app/Hiperthermia/scripts/main.pl';
+use File::Basename qw/dirname/;
+
+BEGIN {
+    open my $fh, '>&', \*STDERR;
+    open STDERR, '>', '/dev/null';
+    system 'perl', 'Build.PL';
+    system 'perl', 'Build', 'build';
+    open STDERR, '>&', $fh;
+};
+
+use blib '/app/Hiperthermia';
+chdir '/app/Hiperthermia';
+
+use Exd::Gui;
+
+Exd::Gui->new->start();