-
Data: 2019-10-01 06:23:00
Temat: Re: gęstość słów kluczowych - pomiar na localhost
Od: RM <r...@w...pl> szukaj wiadomości tego autora
[ pokaż wszystkie nagłówki ]W dniu 26.09.2019 o 12:49, RM pisze:
> W dniu 26.09.2019 o 12:13, Jivanmukta pisze:
>
>> A czy istnieją gotowe takie skrypty, bo nie udało mi się znaleźć w sieci?
>
> Czy ktoś napisałby odpłatnie dla mnie taki skrypt, który działałby offline?
Napisałem taki, może się komuś przyda:
<?php
if (!isset($argv[1]) || isset($argv[3])) {
die('Usage: php ' . $argv[0] . " file.html minpercent\nDefault
minpercent is 7, value must be in range 0...100.\n");
}
if (!file_exists($argv[1])) {
die(sprintf("File %s does not exist.\n", $argv[1]));
}
if (isset($argv[2])) {
$minpercent = (float)$argv[2];
if ($minpercent > 100 || $minpercent < 0) {
die("Argument minpercent must be in range 0...100.\n");
}
} else {
$minpercent = 7;
}
$text = strip_tags(file_get_contents($argv[1]));
$words = preg_split('/(\b|\s|\p{P})+/', $text);
$counters = array();
foreach ($words as $w) {
if ($w == '') continue;
$w = strtoupper($w);
if (!isset($counters[$w])) {
$counters[$w] = 1;
} else {
$counters[$w]++;
}
}
$maxlen = 0;
$factor = 100.0 / count($counters);
foreach ($counters as $w => $n) {
$counters[$w] *= $factor;
if (strlen($w) > $maxlen) {
$maxlen = strlen($w);
}
}
arsort($counters);
foreach ($counters as $w => $p) {
if ($p >= $minpercent) {
printf("%s%s%.2f%%\n", $w, str_repeat('.', $maxlen - strlen($w)
+ 3), $p);
}
}
Najnowsze wątki z tej grupy
- Jakie znacie działające serwery grup dyskusyjnych?
- is it live this group at news.icm.edu.pl
- php, linki z nazwami a $_GET, SEO
- www polityka pl captcha
- dyktatura brudnego palucha
- www.znanylekarz.pl
- Czy pytanie o sczytywanie stron programami/skryptami to tu?
- Grupy webdevowe
- Jak wydrukować stronę?
- IIS, kilka witryn
- linki <a href="/strona.php"> (ze slashami)
- co rozszerza stronę??
- responsywny akapit <p>
- Czy istnieje jakiś emulator przeglądarek pod Mac'a?
- taka sama konfiguracja dla localhost i produkcji
Najnowsze wątki
- 2025-03-31 Kraków => IT Expert (Network Systems area) <=
- 2025-03-31 Białystok => NMS System Administrator <=
- 2025-03-31 Częstochowa => Product Manager - Systemy infrastruktury teleinformaty
- 2025-03-31 Sąd/Sędzia odrzuca wniosek o 30d aresztu Ziobry i jedzie po PO-Komisji Sroki [i Ziobrze w GW wersji]
- 2025-03-31 Warszawa => Sales Executive / KAM <=
- 2025-03-31 Warszawa => International Freight Forwarder <=
- 2025-03-31 Re: Państewko prawka Rumunia czyli pokaz UE leworządności - lider unieważnionych wyborów niedopuszczony do powtórki
- 2025-03-31 Dęblin => JavaScript / Node / Fullstack Developer <=
- 2025-03-31 Re: Kompensacja mocy biernej przy 230VAC
- 2025-03-31 Re: Kompensacja mocy biernej przy 230VAC
- 2025-03-31 Wrocław => Senior Backend Developer <=
- 2025-03-31 Białystok => Generative AI Engineer <=
- 2025-03-31 China-Kraków => Key Account Manager IT <=
- 2025-03-31 Prawne ciekawostki: Ksiądz KRK wygrał ze swoim biskupem sprawę o "naruszenie dóbr osobistych" [SN oddalił kasacje]
- 2025-03-31 Podatek od "konta wspólnego"