File Coverage

File:load-env.pl
Coverage:100.0%

linestmtbrancondsubtimecode
1#!/usr/bin/env perl
2
1
1
1182
2
use 5.022;
3
1
1
1
152
1
582
use CheckSpelling::LoadEnv;
4
5
1
41242
my $parsed_inputs = CheckSpelling::LoadEnv::parse_inputs();
6
7
1
1
1
10
my %inputs = %{$parsed_inputs->{'inputs'}};
8
1
10
for my $var (sort keys %inputs) {
9
31
25
    CheckSpelling::LoadEnv::print_var_val($var, $inputs{$var});
10}