我们应该如何在perl中拆分字符串并将其存储在两个变量中

Question

我们如何在perl中拆分以下字符串：

输入：

$string='/path/to/the/file/on/server/date_in_yyyymmdd/filename-yyyymmdd.tar.gz'

输出：

$string1=/path/to/the/file/on/server/date_in_yyyymmdd
$string2=filename-yyyymmdd.tar.gz

Answer 1

使用正则表达式：

第一个class Places: NSObject { var name:String! init(dictionary:Dictionary<String, Any>) { name = dictionary["name"] as! String } } 是一个贪婪的匹配，第二个print("All Places \(allPlaces[0].placeName)") 是一个非贪婪的匹配，所以应该只有print("All Places \(allPlaces[0].placeName!)") or print("All Places \(allPlaces[0].placeName ?? "")") 的最后一部分

(.*)