Exd/scripts/main.pl

#!/usr/bin/env perl

use v5.40.0;
use strict;
use warnings;

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;

use Exd::Gui;

Exd::Gui->new->start();