PDF Matt 10

This commit is contained in:
Henry Whitney 2019-06-26 12:29:19 -04:00
parent 78323f911f
commit d581af99bc
15 changed files with 65 additions and 105 deletions

View File

@ -81,4 +81,7 @@
5055
4098
3565
191
3819
5543

View File

@ -696,28 +696,26 @@ Matthew 11:1 4172 ||
Matthew 11:3 2036 ||
Matthew 11:3 2087 ||
Matthew 11:4 2532 ||
Matthew 11:4 518
Matthew 11:4 518 report
Matthew 11:4 991 ||
Matthew 11:5 2532 ||
Matthew 11:5 191
Matthew 11:5 191 ||
Matthew 11:5 4434 ||
Matthew 11:6 2532 ||
Matthew 11:6 4624
Matthew 11:7 757 ||
Matthew 11:7 3004 ||
Matthew 11:7 3793 ||
Matthew 11:8 1492 ||
Matthew 11:8 444 ||
Matthew 11:8 5409
Matthew 11:9 1492 ||
Matthew 11:9 3483 ||
Matthew 11:9 3004 ||
Matthew 11:9 2532 ||
Matthew 11:11 3004 ||
Matthew 11:11 3173 ||
Matthew 11:11 910
Matthew 11:11 910 ||
Matthew 11:11 3772 ||
Matthew 11:12 910
Matthew 11:12 910 ||
Matthew 11:12 3772 ||
Matthew 11:12 2532 ||
Matthew 11:13 2532 ||
@ -739,7 +737,7 @@ Matthew 11:20 4172 ||
Matthew 11:20 1096 ||
Matthew 11:21 2532 ||
Matthew 11:21 1096 ||
Matthew 11:21 3819
Matthew 11:21 3819 ||
Matthew 11:22 3004 ||
Matthew 11:22 2532 ||
Matthew 11:23 2532 ||
@ -747,19 +745,16 @@ Matthew 11:23 1096 ||
Matthew 11:23 3306 ||
Matthew 11:24 3004 ||
Matthew 11:25 2036 ||
Matthew 11:25 1843
Matthew 11:25 2532 ||
Matthew 11:26 3483 ||
Matthew 11:26 2107
Matthew 11:26 1096 ||
Matthew 11:27 3860
Matthew 11:27 2532 ||
Matthew 11:27 3762 ||
Matthew 11:27 1014 ||
Matthew 11:28 2532 ||
Matthew 11:29 142 ||
Matthew 11:29 2532 ||
Matthew 11:30 5543
Matthew 11:30 5543 ||
Matthew 11:30 2532 ||
Matthew 12:1 2532 ||
Matthew 12:1 757 ||
@ -939,11 +934,11 @@ Matthew 13:17 1492 ||
Matthew 13:17 991 ||
Matthew 13:19 2532 ||
Matthew 13:19 4920
Matthew 13:20 191
Matthew 13:20 191 ||
Matthew 13:20 2532 ||
Matthew 13:20 2983 ||
Matthew 13:21 4624
Matthew 13:22 191
Matthew 13:22 191 ||
Matthew 13:22 2532 ||
Matthew 13:22 1096 ||
Matthew 13:23 2532 ||
@ -1434,7 +1429,7 @@ Matthew 18:13 1096 ||
Matthew 18:13 3004 ||
Matthew 18:14 2307
Matthew 18:15 2532 ||
Matthew 18:15 191
Matthew 18:15 191 ||
Matthew 18:16 3880 ||
Matthew 18:16 4750 ||
Matthew 18:17 2036 ||
@ -2630,6 +2625,9 @@ Matthew 28:20 2250

View File

@ -1,20 +1,20 @@
ParseLine
$book_name: Matthew, $bkno{Matthew}: 41
$exceptions_file: /Users/Henry/Documents/git.Door43/Tips_and_Hacks/MAST_tW_PDF_Updater/FilesForUpdates/Exceptions/Exceptions_tWs_from_MAST_NT.txt
$blbRef: https://www.blueletterbible.org/net/mat/10/35
$blbRef: https://www.blueletterbible.org/net/mat/11/30
xxx
$missingLine: Matthew 10:35 3565, $ref: Matthew 10:35, $book_name: Matthew, $ch: 10, $vs: 35
$missingLine: Matthew 11:30 5543, $ref: Matthew 11:30, $book_name: Matthew, $ch: 11, $vs: 30
$dataFile: /Users/Henry/Documents/git.Door43/Tips_and_Hacks/MAST_tW_PDF_Updater/FilesForUpdates/User/tW_work_NT.txt
$line: 41 Matthew mat Mt
$fullBk: Matthew, $wabbr: mat, $numBk: Mt, $abr: Mt, $lbsBk: Mt
$fullBk: |Matthew|, $wa{Matthew}: ||, $numBk: Mt, $abr: Mt, $book_name: |Matthew|, $lbsBk: Mt
logos4:TextComparison;ref=BibleNIV.Mt10.35;res=esv,niv2011,niv,nasb95,nrsv,gs-netbible,nlt,leb,kjv1900
logos4:TextComparison;ref=BibleNIV.Mt11.30;res=esv,niv2011,niv,nasb95,nrsv,gs-netbible,nlt,leb,kjv1900
$abbr: mt
$wa{Matthew}/$ch/$vs: mat/10/35
$wa{Matthew}/$ch/$vs: mat/11/30
To system:
open -a /Applications/BBEdit.app /Users/Henry/Documents/git.Door43/en_tn/mat/10/35.md
open -a /Applications/BBEdit.app /Users/Henry/Documents/git.Door43/en_tn/mat/11/30.md
$line: 42 Mark mrk Mk
$fullBk: Mark, $wabbr: mrk, $numBk: Mk, $abr: Mk, $lbsBk: Mk
@ -68,17 +68,17 @@ $line: 66 Jude jud Jud
$fullBk: Jude, $wabbr: jud, $numBk: Jud, $abr: Jud, $lbsBk: Jud
$line: 67 Revelation rev Re
$fullBk: Revelation, $wabbr: rev, $numBk: Re, $abr: Re, $lbsBk: Re
FindVerse |G3565|.
$ref: Matthew 10:35
$fore: For I came to set a man against his father, and a daughter against her mother, and a daughter-in-law against her mother-in-law.
FindVerse |G5543|.
$ref: Matthew 11:30
$fore: For my yoke is easy and my burden is light."
"For I came <G2064> to set <G1369> a man <G444> against <G2596> his father <G3962>, and a daughter <G2364> against <G2596> her mother <G3384>, and a daughter-in-law <G3565> against <G2596> her mother-in-law <G3994>;
"For My yoke <G2218> is easy <G5543>, and My load <G5413> is light <G1645>."
$precon:
"For I came <G2064> to set <G1369> a man <G444> against <G2596> his father <G3962>, and a daughter <G2364> against <G2596> her mother <G3384>, and a daughter-in-law <
$aft: > against <G2596> her mother-in-law <G3994>;
$thisULB: For I came to set a man against his father, and a daughter against her mother, and a daughter-in-law against her mother-in-law.
"For My yoke <G2218> is easy <
$aft: >, and My load <G5413> is light <G1645>."
$thisULB: For my yoke is easy and my burden is light."
$&: "For I came <G2064> to set <G1369> a man <G444> against <G2596> his father <G3962>, and a daughter <G2364> against <G2596> her mother <G3384>, and a daughter-in-law <
$preprecon: "For I came <G2064> to set <G1369> a man <G444> against <G2596> his father <G3962>, and a daughter <G2364> against <G2596> her mother <G3384>, and a
$word: daughter-in-law
<<daughter-in-law>>
$&: "For My yoke <G2218> is easy <
$preprecon: "For My yoke <G2218> is
$word: easy
<<easy>>

View File

@ -132,7 +132,7 @@ sub ParseLine {
} else {
$missingLine = read_file ("Temp${d}temp.tmp");
}
say "\n\n";
if ($missingLine =~ /^(([^:]*) (\d+):(\d+))\t(\d+)/) {
($ref, $book_name, $ch, $vs, $sn, $xfAbr) = ($1, $2, $3, $4, $5, $bkAbr{$1});
($sch, $svs, $strong) = ($ch, $vs, $sn);
@ -146,6 +146,11 @@ sub ParseLine {
$exceptions_file = "$Bin${d}Exceptions${d}Exceptions_tWs_from_MAST_NT.txt";
$language = "greek"
}
if ($^O eq "darwin") {
say "curl https://biblehub.com/$language/$strong.htm";
system "curl https://biblehub.com/$language/$strong.htm > $Bin/Temp/Strongs.html";
system "perl $Bin${d}get_strongs_gist.pl";
}
if ($^O eq "linux") {
open OUT2, ">$Bin${d}Temp${d}Workdata.tmp" or die "$!";
print OUT2 "$language\n${browser}<>";
@ -191,7 +196,10 @@ sub ParseLine {
}
elsif ($^O eq "MSWin32" || $^O eq "MSWin64") {system "START \"\" $tN_page"}
#say "open -a /Applications/Logos.app \"logos4:TextComparison;ref=BibleBHS.$lbsBk${sch}.$svs;res=esv,niv2011,niv,nasb95,nrsv,gs-netbible,nlt,leb,kjv1900\"";
if ($^O eq "darwin") {system `open -a /Applications/Logos.app "logos4:TextComparison;ref=BibleNIV.$lbsBk${sch}.$svs;res=esv,niv2011,niv,nasb95,nrsv,gs-netbible,nlt,leb,kjv1900"`}
if ($^O eq "darwin") {
system `open -a /Applications/Logos.app "logos4:TextComparison;ref=BibleNIV.$lbsBk${sch}.$svs;res=esv,niv2011,niv,nasb95,nrsv,gs-netbible,nlt,leb,kjv1900"`;
system "$browser $Bin/Temp/Strongs.html";
}
}
}
}
@ -343,7 +351,9 @@ sub Finish {
}
say "\nOpening .md files.";
if ($^O eq "darwin") {
system `$browser https://www.blueletterbible.org/lang/lexicon/lexicon.cfm?strongs=$strong`;
#system `$browser https://www.blueletterbible.org/lang/lexicon/lexicon.cfm?strongs=$strong`;
system "perl $Bin/get_strongs_gist.pl";
system "$browser $Bin/Temp/Strongs.html";
system `$textEditor $tW_files`;
system `$textEditor $exceptions_file`;
}
@ -387,28 +397,6 @@ sub Finish {
}
sub Reduce_Strongs {
#say "Reduce_Strongs called";die;
my $fileText = read_file("$Bin/Temp/Strongs.html", binmode => 'utf8');
say LOG "\$fileText\n$fileText\n";die;
if ($language eq "greek") {
if ($fileText =~ /(<div class="vheading2">Thayer's Greek Lexicon.*?<\/iframe>)/) {
$fileText = "$html_wrap$1</body></html>";
$fileText =~ s/(<span class="greek2">)(.*?)(<\/span>)/$1<b>$2<\/b>$3/g;
}
}
elsif ($language eq "hebrew") {
if ($fileText =~ /(<div class="vheading2">\nBrown-Driver-Briggs.*?\[font class="hebrew.*?<\/iframe>)/) {
$fileText = "$html_wrap$1</body></html>";
$fileText =~ s/(<font class="hebrew2">)(.*?)(<\/font>)/$1<font size="+1"><b>$2<\/b><\/font>$3/g;
}
}
else {die}
open OUT, ">:utf8", "$Bin/Temp/Strongs.html" or die;
say OUT $fileText;
close OUT;
}
sub Reduce_This_Verse {
my $fileText = read_file("$Bin/Temp/This_verse.html", binmode => 'utf8') or die "$!: $Bin/Temp/This_verse.html";
if ($fileText =~ /(<div id="par">.*?<\/div>)/) {

View File

@ -1,14 +1,3 @@
Matthew 11:4 518
Matthew 11:5 191
Matthew 11:6 4624
Matthew 11:8 5409
Matthew 11:11 910
Matthew 11:12 910
Matthew 11:21 3819
Matthew 11:25 1843
Matthew 11:26 2107
Matthew 11:27 3860
Matthew 11:30 5543
Matthew 12:4 4286
Matthew 12:4 5315
Matthew 12:11 2902
@ -30,9 +19,7 @@ Matthew 13:13 4920
Matthew 13:14 189
Matthew 13:15 4920
Matthew 13:19 4920
Matthew 13:20 191
Matthew 13:21 4624
Matthew 13:22 191
Matthew 13:23 4920
Matthew 13:24 3908
Matthew 13:27 2570
@ -112,7 +99,6 @@ Matthew 17:26 245
Matthew 17:27 4624
Matthew 18:7 318
Matthew 18:14 2307
Matthew 18:15 191
Matthew 18:18 3089
Matthew 18:19 281
Matthew 18:27 630
@ -2217,7 +2203,6 @@ Luke 2:13 1096
Luke 2:13 3004
Luke 2:14 2532
Luke 2:14 444
Luke 2:14 2107
Luke 2:15 2532
Luke 2:15 1096
Luke 2:15 5613
@ -2349,6 +2334,7 @@ Luke 3:17 2532
Luke 3:18 4183
Luke 3:18 2532
Luke 3:18 2087
Luke 3:19 1651
Luke 3:19 2532
Luke 3:20 4369
Luke 3:20 2532
@ -3246,10 +3232,8 @@ Luke 10:19 91
Luke 10:21 40
Luke 10:21 2532
Luke 10:21 2036
Luke 10:21 1843
Luke 10:21 3483
Luke 10:21 1096
Luke 10:22 3860
Luke 10:22 2532
Luke 10:22 3762
Luke 10:22 1014
@ -6650,7 +6634,6 @@ John 19:4 1854
John 19:4 3004
John 19:4 3762
John 19:5 1854
John 19:5 5409
John 19:5 2532
John 19:5 3004
John 19:5 444
@ -8285,7 +8268,6 @@ Acts 15:38 2532
Acts 15:38 4905
Acts 15:39 3880
Acts 15:39 3138
Acts 15:40 3860
Acts 15:41 1330
Acts 15:41 2532
Acts 16:1 2532
@ -9872,7 +9854,6 @@ Romans 15:6 2532
Romans 15:7 2532
Romans 15:8 1096
Romans 15:8 3962
Romans 15:9 1843
Romans 15:9 2532
Romans 15:9 5567
Romans 15:10 2532
@ -11300,7 +11281,6 @@ Ephesians 1:4 2531
Ephesians 1:4 2532
Ephesians 1:7 859
Ephesians 1:8 2532
Ephesians 1:9 2107
Ephesians 1:10 4138
Ephesians 1:10 2532
Ephesians 1:11 2532
@ -12352,6 +12332,7 @@ Colossians 4:17 2036
2 Timothy 3:16 2532
2 Timothy 3:17 444
2 Timothy 4:1 2532
2 Timothy 4:2 2008
2 Timothy 4:2 2532
2 Timothy 4:3 5198
2 Timothy 4:3 189
@ -13131,7 +13112,6 @@ James 2:2 1525
James 2:2 2986
James 2:2 2532
James 2:2 4434
James 2:3 5409
James 2:3 2532
James 2:3 2036
James 2:3 2573
@ -13807,7 +13787,6 @@ Jude 1:1 2532
Jude 1:2 2532
Jude 1:3 4710
Jude 1:3 318
Jude 1:3 3860
Jude 1:3 40
Jude 1:4 444
Jude 1:4 3819

View File

@ -318,7 +318,7 @@ Matthew 11:2 Now when John heard in the prison about the deeds of the Christ, h
Matthew 11:3 and said to him, "Are you the one who is coming, or should we look for another?"
Matthew 11:4 Jesus answered and said to them, "Go and report to John what you see and hear.
Matthew 11:5 The blind are receiving sight, the lame are walking, lepers are being cleansed, the deaf are hearing again, the dead are being raised back to life, and the gospel is being preached to the poor.
Matthew 11:6 Blessed is anyone who is not offended by me."
Matthew 11:6 Blessed is anyone who does not stumble because of me."
Matthew 11:7 As these men went on their way, Jesus began to say to the crowds about John, "What did you go out in the desert to see—a reed being shaken by the wind?
Matthew 11:8 But what did you go out to see—a man dressed in soft clothing? Really, those who wear soft clothing live in kings' houses.
Matthew 11:9 But what did you go out to see—a prophet? Yes, I say to you, and much more than a prophet.

File diff suppressed because one or more lines are too long

View File

@ -42006,7 +42006,7 @@ Matthew 11:4 Jesus answered and said to them, "Go and report to John what you s
And Jesus <G2424> answered <G611> and said <G3004> to them, "Go <G4198> and report <G518> to John <G2491> what <G3739> you hear <G191> and see <G991>:
Matthew 11:5 The blind are receiving sight, the lame are walking, lepers are being cleansed, the deaf are hearing again, the dead are being raised back to life, and the gospel is being preached to the poor.
the blind <G5185> receive <G308> sight <G308> and the lame <G5560> walk <G4043>, the lepers <G3015> are cleansed <G2511> and the deaf <G2974> hear <G191>, and the dead <G3498> are raised <G1453> up, and the poor <G4434> have the gospel <G2097> preached <G2097> to them.
Matthew 11:6 Blessed is anyone who is not offended by me."
Matthew 11:6 Blessed is anyone who does not stumble because of me."
"And blessed <G3107> is he who <G3739> keeps <G3361> from stumbling <G4624> over <G1722> Me."
Matthew 11:7 As these men went on their way, Jesus began to say to the crowds about John, "What did you go out in the desert to see—a reed being shaken by the wind?
And as these <G3778> were going <G4198> away, Jesus <G2424> began <G757> to speak <G3004> to the multitudes <G3793> about <G4012> John <G2491>, "What <G5101> did you go <G1831> out into the wilderness <G2048> to look <G2300> at? A reed <G2563> shaken <G4531> by the wind <G417>?

View File

@ -33961,7 +33961,7 @@ Matthew 11:3 and said to him, "Are you the one who is coming, or should we look
-----
Matthew 11:4 Jesus answered and said to them, "Go and report to John what you see and hear.
Matthew 11:5 The blind are receiving sight, the lame are walking, lepers are being cleansed, the deaf are hearing again, the dead are being raised back to life, and the gospel is being preached to the poor.
Matthew 11:6 Blessed is anyone who is not offended by me."
Matthew 11:6 Blessed is anyone who does not stumble because of me."
-----
Matthew 11:7 As these men went on their way, Jesus began to say to the crowds about John, "What did you go out in the desert to see—a reed being shaken by the wind?
Matthew 11:8 But what did you go out to see—a man dressed in soft clothing? Really, those who wear soft clothing live in kings' houses.

View File

@ -1 +1 @@
Matthew 10:35 3565
Matthew 11:30 5543

View File

@ -5,21 +5,20 @@
</head>
<body>
<p>Matthew 10:35 For I came to set a man against his father, and a daughter against her mother, and a daughter-in-law against her mother-in-law.
<p>Matthew 11:30 For my yoke is easy and my burden is light."
</p>
<p>"For I came &lt;G2064&gt; to set &lt;G1369&gt; a man &lt;G444&gt; against &lt;G2596&gt; his father &lt;G3962&gt;, and a daughter &lt;G2364&gt; against &lt;G2596&gt; her mother &lt;G3384&gt;, and a <span style="color:red">daughter-in-law</span> <<span style="color:red">G3565</span>&gt; against &lt;G2596&gt; her mother-in-law &lt;G3994&gt;;</p>
<p>"For My yoke &lt;G2218&gt; is <span style="color:red">easy</span> <<span style="color:red">G5543</span>&gt;, and My load &lt;G5413&gt; is light &lt;G1645&gt;."</p>
<p>
/Users/Henry/Documents/git.Door43/en_tw/bible/other/bride<br />
/Users/Henry/Documents/git.Door43/en_tw/bible/kt/good<br />
/Users/Henry/Documents/git.Door43/en_tw/bible/kt/lawofmoses<br />
/Users/Henry/Documents/git.Door43/en_tw/bible/kt/grace<br />
</p>
<p>
/Users/Henry/Documents/git.Door43/en_tw/bible/other/bride: * Strong's: H3618, <span style="color:red">G3565
</span><br />
/Users/Henry/Documents/git.Door43/en_tw/bible/kt/good: * Strong's: H155, H410, H1580, H2532, H2617, H2623, H2895, H2896, H2898, H3190, H3191, H3276, H3787, H3966, H4399, H5232, H6743, H7368, H7399, H7521, H7999, H8231, H8232, G14, G15, G18, G19, G515, G744, G865, G979, G1342, G1380, G1832, G2095, G2097, G2106, G2107, G2108, G2109, G2140, G2163, G2293, G2565, G2567, G2570, G2573, G2986, G3140, G3617, G4147, G4632, G4851, G5224, G5358, <span style="color:red">G5543,</span> G5544<br />
/Users/Henry/Documents/git.Door43/en_tw/bible/kt/lawofmoses: * Strong's: H430, H1881, H1882, H2706, H3068, H4687, H4872, H4941, H8451, G2316, G3544, G3551, <span style="color:red">G3565
/Users/Henry/Documents/git.Door43/en_tw/bible/kt/grace: * Strong's: H2580, H2587, H2589, H2603, G5485, <span style="color:red">G5543
</span><br />
</p>

View File

@ -9,14 +9,5 @@
</head>
<body>
<p>Matthew 9:23</p>
<p><b>/Users/Henry/Documents/git.Door43/en_tn/mat/09/23.md</b></p>
<p><i>the flute players and the crowds in tumult</i></p>
<p> When Jesus came into the official's house, he saw the flute players and the crowd in tumult. </p>
<p>Matthew 9:23</p>
<p><b>/Users/Henry/Documents/git.Door43/en_tn/mat/09/23.md</b></p>
<p><i>crowds in tumult</i></p>
<p> When Jesus came into the official's house, he saw the flute players and the crowd in tumult. </p>
</body>
</html>

View File

@ -32,12 +32,13 @@ my $fileText = read_file("$Bin${d}Temp${d}Strongs.html", binmode => 'utf8');
elsif ($language eq "hebrew") {
if ($fileText =~ /(<div class="vheading2">Brown-Driver-Briggs.*?<\/iframe>)/) {
my $gist = $1;
$gist =~ s/<iframe[^<>]*><\/iframe>//g;
$fileText = "$html_tof$gist</body></html>";
$fileText =~ s/(<font class="hebrew.?">)(.*?)(<\/font>)/$1<font size="+1"><b>$2<\/b><\/font>$3/g;
}
}
else {die}
$fileText =~ s/<iframe[^<>]*>.*?<\/iframe>//g;
$fileText =~ s/<([^ ]*)[^<>]*><\/\1>//g;
open OUT, ">:utf8", "$Bin${d}Temp${d}Strongs.html" or die;
say OUT $fileText;
close OUT;

View File

@ -1,4 +1,4 @@
curl https://biblehub.com/greek/3565.htm > /Users/Henry/Documents/git.Door43/Tips_and_Hacks/MAST_tW_PDF_Updater/FilesForUpdates/Temp/Strongs.html
curl https://biblehub.com/greek/5543.htm > /Users/Henry/Documents/git.Door43/Tips_and_Hacks/MAST_tW_PDF_Updater/FilesForUpdates/Temp/Strongs.html
perl get_strongs_gist.pl
open -a /Applications/Firefox.app --new-window /Users/Henry/Documents/git.Door43/Tips_and_Hacks/MAST_tW_PDF_Updater/FilesForUpdates/Temp/This_interlinear.html /Users/Henry/Documents/git.Door43/Tips_and_Hacks/MAST_tW_PDF_Updater/FilesForUpdates/Temp/Strongs.html /Users/Henry/Documents/git.Door43/Tips_and_Hacks/MAST_tW_PDF_Updater/FilesForUpdates/Temp/This_verse.html /Users/Henry/Documents/git.Door43/Tips_and_Hacks/MAST_tW_PDF_Updater/FilesForUpdates/Temp/mine_results.html &
open -a /Applications/BBEdit.app --new-window /Users/Henry/Documents/git.Door43/en_tn/mat/10/35.md &
open -a /Applications/BBEdit.app --new-window /Users/Henry/Documents/git.Door43/en_tn/mat/11/30.md &

View File

@ -202,7 +202,6 @@ sub PairtWEntriesTotWPageAndUniqSNs {
@relevantSNs = uniq(@relevantSNs);
foreach (@relevantSNs) {
$relevantSNs{$_} = "$_";
#say LOG $relevantSNs{$_}
}
}
close IN;
@ -300,7 +299,8 @@ sub LinkSNsToULBtextViaEntries {
$SNsInCV{$thisCV} = Adjust($SNsInCV{$thisCV}, $thisCV);
$SNsInCV{$thisCV} =~ s/^ +(.*) +$/$1/;
$SNsInCV{$thisCV} =~ s/^ +(.*)/$1/;
$SNsInCV{$thisCV} =~ s/(.*) +$/$1/;
$SNsInCV{$thisCV} =~ s/ {2,}/ /g;
say LOG "**\t\$SNsInCV{$thisCV}: >$SNsInCV{$thisCV}<";
}
@ -340,7 +340,7 @@ sub LinkSNsToULBtextViaEntries {
$workEntries{$thisNum} = $entriesThisSN{$thisNum};
}
$workEntries{$thisNum} =~ s/, $//;
#say LOG "**\t\$thisNum: >$thisNum<\t\$workEntries{$thisNum}: >$workEntries{$thisNum}<";
say LOG "***\t\$thisNum: >$thisNum<\t\$workEntries{$thisNum}: >$workEntries{$thisNum}<";
my @beforeArray = split /, /, $workEntries{$thisNum};
my @sortedArray = reverse sort { substr($a,0,1) <=> substr($b,0,1)
|| length($a) <=> length($b)