Hi,

I was wondering if anybody knows how
to fetch a url and read it's contents.
I can't seem to get the complete array
form the CrackURL method, any thoughts.

use strict;
use Win32::Internet;

my @file1 = undef;
my $Machine = Win32::NodeName();

my $inet = new Win32::Internet();
my $file = $inet->FetchURL("http://$Machine:port";);
   @file1 = $inet->CrackURL("http://$Machine:port",ICU_DECODE);
print "$file \n";
print "$file1[0] \n";
print "$file1[1] \n";
print "$file1[2] \n";
print "$file1[3] \n";
print "$file1[4] \n";
print "$file1[5] \n";
print "$file1[6] \n";

regards,

John
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to