Sub FindPackageName As ResumableSub
Wait For (RunShell(False, "jar", Array("xf", "jar.jar", "META-INF"))) Complete (StdOut As String)
Dim s As String = File.ReadString(TempFolder, "META-INF/MANIFEST.MF")
Dim m As Matcher = Regex.Matcher2($"^JavaFX-Application-Class:\s+(.*)\.main$"$, Regex.MULTILINE, s)
m.Find
' PackageName = m.Group(1)
PackageName = "b4j.example"
Log($"Package name: ${PackageName}"$)
Return True
End Sub