# ******************************************************************** # Paste this block of code on your web page where you would like text # links to be displayed. This code will dynamically add and remove text # links on your web page according to your LinksPanel.com settings. # ******************************************************************** # ******************************************************************** # Please DO NOT modify anything below # ******************************************************************** use LWP::Simple; use URI::Escape; my $QueryString; $QueryString = "&Key=FHWQ-SMI1-26S3" ; $QueryString .= "LinkUrl=".uri_escape((($ENV{"HTTPS"} eq "on")?"https://":"http://").$ENV{"HTTP_HOST"}.$ENV{"REQUEST_URI"}); #Make request my $LinksPanel_content = get("https://www.linkspanel.com/engine.php?".$QueryString); if($LinksPanel_content) { print $LinksPanel_content; }