#!usr/bin/perl
use v5.12;
use warnings;
use lib '../lib', 'lib', '.';
use Kephra;
my $file = shift;
my $app = Kephra->new( );
$app->{'window'}->read_file( $file ) if defined $file and -r $file;
$app->MainLoop();
#!usr/bin/perl
use v5.12;
use warnings;
use lib '../lib', 'lib', '.';
use Kephra;
my $file = shift;
my $app = Kephra->new( );
$app->{'window'}->read_file( $file ) if defined $file and -r $file;
$app->MainLoop();