/**
* @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;
}
