Help for this page
my $diretorioScript = dirname(__FILE__); my $excel = Spreadsheet::XLSX->new( "$diretorioScript\\jofalista.x +lsx", );
my $diretorioScript= $ENV{PAR_PROGNAME} # running under PAR || dirname($0); # running directly