diff options
author | zotlabs <mike@macgirvin.com> | 2017-11-04 18:18:10 -0700 |
---|---|---|
committer | zotlabs <mike@macgirvin.com> | 2017-11-04 18:18:10 -0700 |
commit | 7ef641e256aba64978ea9a41a31b78e4af5c68b0 (patch) | |
tree | ac7e80030e53bc0c91fb6a3757e04e4e65fb1b3b /library/langdet/docs/example_web.php | |
parent | 1d903655afdd8e49942c6d6c9ca1a7feadeaaa82 (diff) | |
parent | 6995d54a3cc162d87f881f6e206fa356230fd9e8 (diff) | |
download | volse-hubzilla-7ef641e256aba64978ea9a41a31b78e4af5c68b0.tar.gz volse-hubzilla-7ef641e256aba64978ea9a41a31b78e4af5c68b0.tar.bz2 volse-hubzilla-7ef641e256aba64978ea9a41a31b78e4af5c68b0.zip |
Merge branch 'dev' of https://github.com/redmatrix/hubzilla into dev_merge
Diffstat (limited to 'library/langdet/docs/example_web.php')
-rw-r--r-- | library/langdet/docs/example_web.php | 72 |
1 files changed, 0 insertions, 72 deletions
diff --git a/library/langdet/docs/example_web.php b/library/langdet/docs/example_web.php deleted file mode 100644 index 1e155fef2..000000000 --- a/library/langdet/docs/example_web.php +++ /dev/null @@ -1,72 +0,0 @@ -<?php - -/** - * example usage (web) - * - * @package Text_LanguageDetect - * @version CVS: $Id: example_web.php 205493 2006-01-18 00:26:57Z taak $ - */ - -// browsers will encode multi-byte characters wrong unless they think the page is utf8-encoded -header('Content-type: text/html; charset=utf-8', true); - -require_once 'Text/LanguageDetect.php'; - -$l = new Text_LanguageDetect; -if (isset($_REQUEST['q'])) { - $q = stripslashes($_REQUEST['q']); -} - -?> -<html> -<head> -<title>Text_LanguageDetect demonstration</title> -</head> -<body> -<h2>Text_LanguageDetect</h2> -<? -echo "<small>Supported languages:\n"; -$langs = $l->getLanguages(); -sort($langs); -foreach ($langs as $lang) { - echo ucfirst($lang), ', '; - $i++; -} - -echo "<br />total $i</small><br /><br />"; - -?> -<form method="post"> -Enter text to identify language (at least a couple of sentences):<br /> -<textarea name="q" wrap="virtual" cols="80" rows="8"><?= $q ?></textarea> -<br /> -<input type="submit" value="Submit" /> -</form> -<? -if (isset($q) && strlen($q)) { - $len = $l->utf8strlen($q); - if ($len < 20) { // this value picked somewhat arbitrarily - echo "Warning: string not very long ($len chars)<br />\n"; - } - - $result = $l->detectConfidence($q); - - if ($result == null) { - echo "Text_LanguageDetect cannot identify this piece of text. <br /><br />\n"; - } else { - echo "Text_LanguageDetect thinks this text is written in <b>{$result['language']}</b> ({$result['similarity']}, {$result['confidence']})<br /><br />\n"; - } - - $result = $l->detectUnicodeBlocks($q, false); - if (!empty($result)) { - arsort($result); - echo "Unicode blocks present: ", join(', ', array_keys($result)), "\n<br /><br />"; - } -} - -unset($l); - -/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */ - -?> -</body></html> |