Gossamer Forum
(Advanced Search)
for
Home : Products : Gossamer Forum : Development, Plugins and Globals :

*NOT* escaping a Global return

Jun 5, 2003, 11:34 AM
carfac
Veteran (1208 posts)
Jun 5, 2003, 11:34 AM
Post #1 of 7
Views: 1137
Shortcut
Quote Reply
*NOT* escaping a Global return
Hi:

I was going to put in a global "<%ad_top%>" that is a perl call to my ad management program. The global is:

sub {

use LWP::Simple;

my $html = get("http://www.mysite.com/banners.fpl?region=7&mode=SSI&keyword=NULL");

$html ||= "[an error occurred processing this request]";

return $html;

}

Only the code returned is escaped- that is, a "<" is &lt;, etc. So rather than printing the code out, it is all escaped and prints literally. What do I do to fix this?


dave

Big Cartoon DataBase
Big Comic Book DataBase
Jun 5, 2003, 12:09 PM
Andy
Veteran / Moderator (17298 posts)
Andy's avatar
Jun 5, 2003, 12:09 PM
Post #2 of 7
Views: 1131
Shortcut
Quote Reply
Re: [carfac] *NOT* escaping a Global return In reply to
You tried html_unescape?

Code:
sub {

use LWP::Simple;

my $html = get("http://www.mysite.com/banners.fpl?region=7&mode=SSI&keyword=NULL");

$html ||= "[an error occurred processing this request]";

$html = html_unescape($html);

return $html;

}

You may need to use something like;

$html = GT::CGI::html_unescape($html);

Cheers

Andy (mod)
andy@ultranerds.co.uk

IMPORTANT: I've now moved to ultranerds.co.uk, and the .com will no longer work!
Want to give me something back for my help? Please see my Amazon Wish List
GLinks ULTRA Package (plugins total "value" $3,325 & rising, for just $350)| GLinks ULTRA Package PRO (plugins total "value" $5,625 & rising, for just $500)
Support Forum | Links SQL Plugins | DMOZ Dumps | UltraNerds | ULTRAGLobals Plugin | Pre-Made Template Sets | FREE GLinks Plugins!
Compare our different Plugin packages *new* Free CSS Templates
Jun 5, 2003, 12:40 PM
carfac
Veteran (1208 posts)
Jun 5, 2003, 12:40 PM
Post #3 of 7
Views: 1130
Shortcut
Quote Reply
Re: [Andy] *NOT* escaping a Global return In reply to
Andy:

Thanks! I knew there was some method of doing this, I just did not know how!

Thank you!
dave

Big Cartoon DataBase
Big Comic Book DataBase
Jun 5, 2003, 12:50 PM
carfac
Veteran (1208 posts)
Jun 5, 2003, 12:50 PM
Post #4 of 7
Views: 1128
Shortcut
Quote Reply
Re: [carfac] *NOT* escaping a Global return In reply to
Andy:

Hmmm... the first caused an error... so I went to the second method... that worked (did not crash Forum) but it did NOT unescape the characters...

dave
dave

Big Cartoon DataBase
Big Comic Book DataBase
Jun 5, 2003, 1:00 PM
Paul
Veteran (19537 posts)
Jun 5, 2003, 1:00 PM
Post #5 of 7
Views: 1126
Shortcut
Quote Reply
Re: [carfac] *NOT* escaping a Global return In reply to
Code:
sub {
require LWP::Simple;
my $html = LWP::Simple::get("http://www.mysite.com/banners.fpl?region=7&mode=SSI&keyword=NULL");

return $html ? $IN->html_unescape($html) : q{[an error occured processing this request]};
}
Jun 5, 2003, 1:41 PM
carfac
Veteran (1208 posts)
Jun 5, 2003, 1:41 PM
Post #6 of 7
Views: 1121
Shortcut
Quote Reply
Re: [Paul] *NOT* escaping a Global return In reply to
Paul:

Thanks!

Tried it- still did not escape it....

I wonder if it is a problem with the output of the other program- I am using the perl output of the AdvertPro program....
dave

Big Cartoon DataBase
Big Comic Book DataBase
Jun 10, 2003, 1:15 PM
carfac
Veteran (1208 posts)
Jun 10, 2003, 1:15 PM
Post #7 of 7
Views: 1094
Shortcut
Quote Reply
Re: [carfac] *NOT* escaping a Global return In reply to
OK, Figured it out.

Do NOT escape the global.... escape the CALL to the global...

So, for the above script, suppose it is called ad_top

In the templete, just put <%unescape_html ad_top%>

easy!
dave

Big Cartoon DataBase
Big Comic Book DataBase