#!/usr/bin/perl -w use strict; use lib qw(/home/paulojjs/univ/opcao3/Chronology/lib); use Chronology::CGIApp; my $dir = 'case-studies/computer_history'; my $app = new Chronology::CGIApp(PARAMS => { 'file' => "/home/paulojjs/univ/opcao3/Chronology/$dir/chrono_IEEE.cl", 'backend' => 'chronl', 'base_dir' => "../$dir", }); $app->run(); 1;