Funeral Homes in BEACHLAKE PA
|
BRUCE SNYDER
$szTopics = $_GET['terms']; // keywords to look up
$szSources = $_GET['src']; // keywords to look up
$docurl = $_SERVER['REQUEST_URI'];
if ($szTopics == "") {
$szTopics = $docurl;
if (substr($szTopics,0,1) == "/") { $szTopics = substr($szTopics,1); }
$dotpos = strpos($szTopics,".");
$szTopics = substr($szTopics,0,$dotpos);
}
$szSources = strtolower($szSources); // sources to search
$rgszTopics = preg_split ("/[\- ]/", $szTopics); // turn keywords into array
if ($rgszTopics[0] == "colleges") { $rgszTopics[0] = "college"; }
if ($rgszTopics[0] == "hospitals") { $rgszTopics[0] = "hospital"; }
if ($rgszTopics[1] == "homes") { $rgszTopics[1] = "home"; }
if ($rgszTopics[0] == "funeral") { $rgszTopics[1] = ""; }
$szTopicsDisplay = implode (" ", $rgszTopics); // keywords with spaces for display
$szTopicsDisplay = ucwords($szTopicsDisplay); // Upper first letters
if ($szTopicsDisplay == "") { $szTopicsDisplay = "Latest"; }
$szTopicsCarp = strtolower(implode ("|", $rgszTopics)); // keywords w/ | for Carp
$szTopicsFilename= strtolower(implode ("_", $rgszTopics)); // keywords w/ _ for cache filename
$szTopicsSearch = strtolower(implode ("+", $rgszTopics)); // keywords w/ + for searches
// collections that pre-filter (i.e. search results)
//
$rgSrcDefault = array (
"search.msn.com/results.aspx?format=rss&q=$szTopicsSearch",
"api.bing.com/rss.aspx?Source=News&Market=en-US&Version=2.0&Query=$szTopicsSearch",
// "search.news.yahoo.com/usns/ynsearch/categories/47/index.html?p=\"$szTopicsSearch\"",
// "www.hotnews360.com/cgi-bin/googlit.pl?q=$szTopicsSearch",
// "www.daypop.com/search?q=\"$szTopicsSearch\"&s=1&c=10&t=p&o=rss",
// "www.findforward.com/?q=$szTopicsSearch&t=get-rss",
);
$rgSrcSearch = array (
"www.findforward.com/?q=$szTopicsSearch&t=get-rss",
);
$rgSrcSearchLeo = array (
"www.findforward.com/?q=site:ask-leo.com+$szTopicsSearch&t=get-rss",
);
// collections that we filter on fetch
//
$rgSrcMS = array (
"rssnewsapps.ziffdavis.com/msw.xml",
"www.nytimes.com/services/xml/rss/userland/Technology.xml",
"www.microsite.reuters.com/rss/technologyNews",
"slashdot.org/slashdot.rss",
"www.theregister.co.uk/tonys/slashdot.rdf",
"arstechnica.com/etc/rdf/ars.rdf",
"rssnewsapps.ziffdavis.com/tech.xml",
"www.infoworld.com/rss/news.xml",
"kbalertz.com/rss/winxp.xml",
"kbalertz.com/rss/ie600.xml",
"www.microsoft.com/WindowsXP/expertzone/expertzone.xml",
);
$rgSrcTech = array (
"www.nytimes.com/services/xml/rss/userland/Technology.xml",
"www.microsite.reuters.com/rss/technologyNews",
"slashdot.org/slashdot.rss",
"www.theregister.co.uk/tonys/slashdot.rdf",
"arstechnica.com/etc/rdf/ars.rdf",
"rssnewsapps.ziffdavis.com/tech.xml",
"www.infoworld.com/rss/news.xml",
"www.bigblueball.com/rss.xml",
);
$szSourceDisplay = "news";
$rgSourceFeeds = $rgSrcDefault;
$fFilter = 0;
if ($szSources == "") { $szSources = "news"; }
$szTopicsDisplay = "News and Links for " . $szTopicsDisplay ;
?>
require_once "/var/www/carp/carp.php";
CarpLoadPlugin('filter.php');
?>
Funeral Homes in BEACHLAKE PENNSYLVANIA
Hospitals in BEACHLAKE PENNSYLVANIA Nursing Homes in BEACHLAKE PENNSYLVANIA Public Schools in BEACHLAKE PENNSYLVANIA Private Schools in BEACHLAKE PENNSYLVANIA Colleges in BEACHLAKE PENNSYLVANIA Nearby Cities
Copyright © All rights reserved
|