Evaluated proc yturl2id url {last [regexp -inline {v=(.+?)(?:$| |\&|#)} $url]}