Caller ID Superfecta

<?php

$file = "areacodes.txt";

$fh = fopen($file, 'w') or die("can't open file");

$lcnt = 0;

$expr = "/class=\"txtTabla\"><div align=\"center\">(.+)<\/div><\/td>/";

set_time_limit(0);

$area_codes = array();

for ($i = 0; $i <= 2900; $i = $i + 25){

        $result = file_get_contents("http://www.cnc.gov.ar/infotecnica/numeracion/indicativosinter.asp?offset=$i");

        preg_match_all($expr,$result,$matches);

        foreach ($matches[1] as $val){

                // Store as key in array to deduplicate

                $area_codes[$val] = "set";

        }

        echo "Read ".($i+1)." to " . ($i + count($matches[1])) . "<br>\n";

        @ob_flush();

        @flush();

}

echo "Writing ".count($area_codes)." area codes to file...";

@ob_flush();

@flush();

$line = '';

foreach ($area_codes as $key => $val){

        $line .= '"0' . $key . '",';

        $lcnt ++;

        if($lcnt>10){

                $lcnt = 0;

                $line .= "\n\t\t";

        }

        fwrite($fh, $line);

        $line = '';

}        

echo "Done.";

@ob_flush();

@flush();

fclose($fh);

?>