Vypisování obsahu souborů podle velikosti

<?php
$nahoda = array('pocitadlo/impuls.txt',
'pocitadlo/evropa2.txt',
'pocitadlo/frekvence1.txt',
'pocitadlo/bonton.txt',
'pocitadlo/countryradio.txt',
'pocitadlo/radiobeat.txt');

rsort($nahoda);
foreach ($nahoda as $key => $val) {
echo "<tr><td>$key.</td><td>".file_get_contents($val)."</td></tr><br />";
}
?>

<?php
// cesta k souborum (slozka)
$cesta = "pocitadlo"; 
// kolik prvnich souboru se ma vypsat
(int)$pocet = 10;
#========================================
$slozka = dir($cesta); 
// pripravene pole pro soubory
$pole_radio = array();
$pole_cislo = array();
// pole podporovanych pripon souboru
$pole_pripon=array('txt');
#========================================
# CYKLUS -> projde povolene soubory v dane slozce a provede dalsi operace
while($soubor=$slozka->read()) /* precte soubory ve slozce */{
  if ($soubor=="." || $soubor=="..") continue; // vylouci stejny a nadrazeny adresar 
$soubor_n = explode(".",  $soubor); // rozdeli priponu a nazev souboru do pole
$pripona = $soubor_n[1]; // pripona souboru
$i=1;
    foreach($pole_pripon as $pripona_z) // prohledani pole pripon
    { 
// kontrola souboru jestli je soubor povoleny typ souboru (podle pripony), pokud ano pokracuj
if ($pripona==$pripona_z){
    $obsah=file_get_contents($cesta."/".$soubor);   
    $pole_radio[] = $soubor_n[0]; $pole_cislo[] = $obsah; /* ulozi obsah 
souboru(cislo) a nazev souboru(radio) do predem vytvorenych poli */
}}} 
// prohodi hodnoty a indexi v poli
$pole_cislo2 = array_flip($pole_cislo);
// seradi pole podle prehozenych hodnot(obs.soub.)
 krsort($pole_cislo2);
// prohleda obe dve pole a priradi nazev radia k danemu zjistenemu cislu
foreach ($pole_cislo2 as $key => $val) {	
  foreach ($pole_radio as $key_r => $val_r) {
 if($val==$key_r and $i<=$pocet){// kontrola
// VYPIS
echo "<tr><td>".$i.".) </td><td>".$val_r.": ".$key."</td></tr><br />";
$i++;
}}}
?>

strpos

strlen

strstr

substr

<?php
// pole nazvu radii
$pole_real_radii = array(
'Beat','Bonton',
'Classic','Club',
'Kiss','Evropa2',
'Impuls','atd...',
// vzdy nakonci
'FM','Radio'
);
#========================================
// cesta k souborum (slozka)
$cesta = "pocitadlo"; 
// kolik prvnich souboru se ma vypsat
(int)$pocet = 10;
#========================================
$slozka = dir($cesta); 
// pripravene pole pro soubory
$pole_radio = array();
$pole_cislo = array();
// pole podporovanych pripon souboru
$pole_pripon=array('txt');
// pripravene pole pro ukladani rozdeleneho nazvu
$pole_realnazev_radio = array();
#========================================
# CYKLUS -> projde povolene soubory v dane slozce a provede dalsi operace
while($soubor=$slozka->read()) /* precte soubory ve slozce */{
  if ($soubor=="." || $soubor=="..") continue; // vylouci stejny a nadrazeny adresar 
$soubor_n = explode(".",  $soubor); // rozdeli priponu a nazev souboru do pole
$pripona = $soubor_n[1]; // pripona souboru
$i=1;
#========================================
    foreach($pole_pripon as $pripona_z){// prohledani pole pripon    
// kontrola souboru jestli je soubor povoleny typ souboru (podle pripony), pokud ano pokracuj
if ($pripona==$pripona_z){
 // otevre a precte obsah souboru
	$obsah=file_get_contents($cesta."/".$soubor);
 // ulozi obsah souboru do pole
	$pole_cislo[] = $obsah; 
#========================================
// prohleda nazev soub a vytvori real. nazev radia	
	foreach($pole_real_radii as $hledej_rad){
	if(strstr($soubor_n[0], strtolower($hledej_rad))==true){$pole_realnazev_radio[]=$hledej_rad;}
}
#========================================
 // spoji nelezene casti nazvu radia
 $spoj_nazev = implode(" ",$pole_realnazev_radio);
// ulozi realny nazev radia do  pole	
	$pole_radio[] = $spoj_nazev;
#========================================
/*smaze predesle nalezene realne nazvy radii
a uvolni tak misto pro dalsi hledani nazvu*/
$count_smaz_pol = count($pole_realnazev_radio);
for($j=1;$j<=$count_smaz_pol;$j++){array_pop($pole_realnazev_radio);}
}}} 
#========================================
// prohodi hodnoty a indexi v poli
$pole_cislo2 = array_flip($pole_cislo);
// seradi pole podle prehozenych hodnot(obs.soub.)
 krsort($pole_cislo2);
// prohleda obe dve pole a priradi nazev radia k danemu zjistenemu cislu
foreach ($pole_cislo2 as $key => $val) {	
  foreach ($pole_radio as $key_r => $val_r) {
 if($val==$key_r and $i<=$pocet){// kontrola
// VYPIS
echo "<tr><td>".$i.".) </td><td>".$val_r.": ".$key."</td></tr><br />";
$i++;
}}}
?>