[ic] problem with using SSLeay in globalsub

[interchange-users@icdevgroup.org (Kevin Walsh)]

sung [sungho63@yahoo.com] wrote:
> 
> I wrote this globalsub routine to get a webapge from another website.
> This program does not work from line 7.  It does not get the page.
> 
> Can someone see what i am doing wrong?
> Net::SSLeay is installed fine.
> Thanks in advance,
> Steve
> 
> 
> 1  GlobalSub <<EOS
> 2  
> 3  sub getpage{
> 4
> 5    use Net::SSLeay qw(get_https post_https sslcat make_headers make_form);
> 6
> 7    ($page)
> 8             = get_https('www.cnn.com', 443, '/',
> 9                    make_headers(
> 10                           'User-Agent' => 'Cryptozilla/5.0b1',
> 11                           'Referer'    => 'https://www.cnn.com'
> 12                  ));     
> 13  return($page);  
> 14
> 15 }
> 16 EOS
> 
Did your error.log file not show an error message?  Without an
error message to help the diagnosis, the only thing I can think of
is that line 7 should look more like this:

    my ($page)

I assume that CNN have issued full written permission for you to use
their copyrighted content on your website, and that you have a valid
reason to set the referrer to something other than your own site.

>
> Do you Yahoo!?
>
Only when I'm not feeling very well.

-- 
   _/   _/  _/_/_/_/  _/    _/  _/_/_/  _/    _/
  _/_/_/   _/_/      _/    _/    _/    _/_/  _/   K e v i n   W a l s h
 _/ _/    _/          _/ _/     _/    _/  _/_/    kevin@cursor.biz
_/   _/  _/_/_/_/      _/    _/_/_/  _/    _/