Funeral Homes in NEWTOWN PA
|
CHARLES F SWARTZ FUNERAL HOME
$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 NEWTOWN PENNSYLVANIA
Hospitals in NEWTOWN PENNSYLVANIA Nursing Homes in NEWTOWN PENNSYLVANIA Public Schools in NEWTOWN PENNSYLVANIA Private Schools in NEWTOWN PENNSYLVANIA Colleges in NEWTOWN PENNSYLVANIA Nearby Cities
Copyright © All rights reserved
|