Funeral Homes in KULPMONT PA
|
C J LUCAS FUNERAL HOME INC
$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 KULPMONT PENNSYLVANIA
Hospitals in KULPMONT PENNSYLVANIA Nursing Homes in KULPMONT PENNSYLVANIA Public Schools in KULPMONT PENNSYLVANIA Private Schools in KULPMONT PENNSYLVANIA Colleges in KULPMONT PENNSYLVANIA Nearby Cities
Copyright © All rights reserved
|