Help for this page

Select Code to Download


  1. or download this
    use Win32::IE::Mechanize qw( );
my $mech = Win32::IE::Mechanize->new();
my $url = 'http://www.vitoco.cl/test-ref';
$mech->get($url);
print $mech->content();
  2. or download this
    C:\test>test-ie.pl
<HTML><HEAD><TITLE>Referrer test</TITLE></HEAD>
...
C:\test>test-ie.pl
<HTML><HEAD><TITLE>Referrer test</TITLE></HEAD>
<BODY><IMG alt=img1 src="img1"> <IMG alt=img2 src="img2"> </BODY></HTM
+L>