view release on metacpan or  search on metacpan

lib/App/InvestSim.pm  view on Meta::CPAN

use 5.022;
use strict;
use warnings;

use App::InvestSim::GUI;
use App::InvestSim::Values;
use Tkx;

our $VERSION = 'v1.0.1';

sub run($) {
  my ($res_dir) = @_;
  App::InvestSim::Values::init_values();
  App::InvestSim::Values::autoload();
  App::InvestSim::GUI::build($res_dir);
  App::InvestSim::GUI::refresh_all_fields();
  Tkx::MainLoop();
}

1;