'apple', 200 => 'banana']; * $opposite = mapkv($data, function($k, $v){ return [-1 * $k => strtoupper($v)]; }); * * This would return [-100 => 'APPLE', -200 => 'BANANA'] * * By convention, mapping functions should return an 1-row array "[newKey => newValue]". * * Some unconventional forms are also defined: * - Return empty array ==> Skip/omit the row * - Return multiple items ==> Add all items to the result * - Return an unkeyed (numeric) array ==> Discard original keys. Items are appended numerically (`$arr[] = $value`). * * @param array $array * Values to iterate over * @param callable $func * Callback function. * function(scalar $key, mixed $value): array * @return array * The filtered array. */ public function mapkv($array, $func) { $r = []; foreach ($array as $k => $v) { foreach ($func($k, $v) as $out_k => $out_v) { if (isset($r[$out_k])) { $r[] = $out_v; } else { $r[$out_k] = $out_v; } } } return $r; } /** * Map file-names. * * @param string $matchPat * Ex: 'src/*.json' * @param string $outPat * Ex: 'dest/#1.json' * @param bool $flip * The orientation of the result map. * If false, returned as "original => filtered". * If true, returned as "filtered => original". * @return array * List of files and the corresponding names. */ public function globMap($matchPat, $outPat, $flip = FALSE) { $inFiles = glob($matchPat); $regex = ';' . preg_quote($matchPat, ';') . ';'; $regex = str_replace(preg_quote('*', ';'), '(.*)', $regex); $replacement = preg_replace(';#(\d+);', '\\' . '\\\1', $outPat); $outFiles = preg_replace($regex, $replacement, $inFiles); return $flip ? array_combine($outFiles, $inFiles) : array_combine($inFiles, $outFiles); } public function chdir($directory) { if (!\chdir($directory)) { throw new IOException("Failed to change directory ($directory)"); } } /** * @param string|string[] $pats * List of glob patterns. * @param null|int $flags * @return array * List of matching files. */ public function glob($pats, $flags = NULL) { $r = []; $pats = (array) $pats; foreach ($pats as $pat) { $r = array_unique(array_merge($r, (array) \glob($pat, $flags))); } sort($r); return $r; } /** * Read a set of files and concatenate the results * * @param string|string[] $srcs * Files to read. These may be globs. * @param string $newLine * Whether to ensure that joined files have a newline separator. * Ex: 'raw' (as-is), 'auto' (add if missing) * @return string * The result of joining the files. */ public function cat($srcs, $newLine = 'auto') { $buf = ''; foreach (glob($srcs) as $file) { if (!is_readable($file)) { throw new \RuntimeException("Cannot read $file"); } $buf .= file_get_contents($file); switch ($newLine) { case 'auto': if (substr($buf, -1) !== "\n") { $buf .= "\n"; } break; case 'raw': // Don't break; } } return $buf; } } __halt_compiler();----SIGNATURE:----UaKGjUVVp7JJOhyWmiv11sfIrt64Bh/fChwlPaetnjp9UFn8x5w9AuYDAjuAGn8guMM5slp778I2tfH6Y37V0K1V37wd6dLDe+pz7itoPT3Y01p04X5zBEgFlwKGQL77gmxVUQFU4ljJtUnMDxNHCN5QaCaVJnx4h4VwLZPRYIukg6VjhBsd/ZdjCkgNIFOcClniHwuFyf4+86UrQI5lQhQWWMe6KkOOaA4iuV5BupDCIa8CsJ8CZ1LrM9I+3dQr0jwUG/4WfolBjin5GsVYBqbuaB9r3/9a226cMgaWwZpsQ9HJLz5UCgPhQjyfON47PR5+c51/FpvYKJAQKjlAd3exnYrYkDqywARJliKcawyK5Aer8r66vQ1s+fdZtr5jVYLl/AIL1EhEzZkCHhXbV574WpmACrOAjErQTS8gqkm2xCU4YcPwGl0sFufQyYupNTOlw4jXUDMr9uIrZ4hCCxojbevMLCH5kObpV4D+uXH7DSQHFQKgtaUXuBMFi2FPByV/5jogs4YaReDtufPNZKzjkFpubN6Ezh3cj1XqKX1ZoIJ3RviotpSUY663XEUIeVjpVOvhxENLrER9pEEhoB0D+mVABmA4I/RKx915cwWPNcMtZo6QgyWOluRduDAh4T0cG8qv5DY18sF1p9BGW6304HFoHt2SFrFfGLllcZs=----ATTACHMENT:----NTQ1ODA4NjU0MTM2NTYyMCA1Mjk5MTc0OTY1NzM4Njc3IDU0ODI4ODA4MDIwODMwNTc=