/** * @param $index * @return string|Lexer\Token|Lexer\Parsed */ private function resolve($index) { if (strpos($index, self::BIND_PREFIX) !== false) { $index = (string) Parser::create($index)->inner(self::BIND_PREFIX, self::BIND_POSTFIX); } $key = self::BIND_PREFIX . $index . self::BIND_POSTFIX; if (!isset($this->binds[$key])) { return $index; } $bind = $this->binds[$key]; if ($bind instanceof Lexer\Token) { return $bind->unEscapedContent; } elseif ($bind instanceof Lexer\Parsed) { return $bind; } }
private function getPerlTablesUrlList() { $client = new Client(); $list = array(); $page = $client->fetch('http://cpansearch.perl.org/src/SBURKE/Text-Unidecode-' . self::LIB_VERSION . '/lib/Text/Unidecode/'); foreach (StringParser::create($page)->innerAll('.pm">', '</a>') as $xXXpm) { $list[] = 'http://cpansearch.perl.org/src/SBURKE/Text-Unidecode-' . self::LIB_VERSION . '/lib/Text/Unidecode/' . $xXXpm; } return $list; }