Help for this page
my @jobvar_list=qw/senior exec/; my @jobname_list=( " Senior", " Executive" ); my $n = @jobname_list; # length
my %jobs = ( ... } # end for ($st=1; $st<=$jobvar_list; $st++)