- <?php
- $handle = fopen("URLs.txt", "r");
- if ($handle) {
- while (($line = fgets($handle)) !== false) {
- // process the line read.
- $url = rtrim($line);
- $cleanUrl = clean($line);
- echo "scanning: ".$url."\nFolder: ".$cleanUrl."\n";
- system("perl /opt/CHaS/PEaS.pl /location/to/create/folder/of/output/$cleanUrl $url");
- }
-
- fclose($handle);
- } else {
- // error opening the file.
- }
-
-
- function clean($string) {
- $string = str_replace(' ', '-', $string); // Replaces all spaces with hyphens.
- $string = preg_replace('/[^A-Za-z0-9\-]/', '_', $string); // Removes special chars.
-
- return preg_replace('/_+/', '_', $string); // Replaces multiple hyphens with single one.
- }
- ?>