Nacitanie viacerych suborov

function s2p($mask)
    {
    $translate = Array(
    "." => "\\.",
    "*" => ".*",
    "?" => ".?",
    "+" => "\\+",
    "[" => "\\[",
    "]" => "\\]",
    "(" => "\\(",
    ")" => "\\)",
    "{" => "\\{",
    "}" => "\\}",
    "^" => "\\^",
    "\$" => "\\\$",
    "\\" => "\\\\",
    );
    return "/^".strtr($mask, $translate)."$/";
    }

    function include_files($dir, $mask)
    {
    $mask = s2p($mask);

    $files = array();

    if (!preg_match("/\/$/", $dir)) {
    $dir .= "/";
    }

    if (is_dir($dir)) {
    if ($dh = opendir($dir)) {
    while (($filename = readdir($dh)) !== false) {
    if ($filename != "." && $filename != ".." && is_file($dir . $filename) && preg_match($mask, $filename))
    $files[] = $dir . $filename;
    }
    closedir($dh);
    }
    }
    rsort($files);
    foreach ($files as $filename) {
    include($filename);
    }
    }
    include_files("../files", "dlink*.dat");