Trying run.pl to run Glib::Object::Introspection on compile time.
This commit is contained in:
parent
6eb838904b
commit
ef58b9b8f9
19
run.pl
19
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();
|
||||
|
Loading…
Reference in New Issue
Block a user