Help for this page
while (my $line=<DATA>) { chomp $line; ... P-48 |B-1B | JU-88 B-29 |ME-109
"B-52|P-51| P-61" "P-48|B-1B| JU-88" "B-29|ME-109"