in reply to request URL from a specified IP address
When I read your post you seem to be asking, "I want to test many IP addresses for a URL (or URI)" because you were thinking you could accomplish this by just editing the /etc/hosts file and then test. If I've read you're problem correctly then something like this would work or get you started.
another way:#!/usr/bin/perl use strict; use warnings; use LWP::Simple; my @IP = qw/ 192.168.1.1 192.168.1.2/; my $url = '/home/index.html'; foreach (@IP) { print "TESTING: $_$url\n"; my $reply = get("http://$_$url"); #test reply here, etc... }
I would probably put all of my IPs in a file:
192.168.1.1
192.168.1.2
etc ...
and call it ip.txt
#!/usr/bin/perl # test_url.pl use strict; use warnings; use LWP::Simple; my $ip=""; my $url = '/home/index.html'; while(defined($ip=<STDIN>)) { my $reply = get("http://$ip$url"); warn "couldn't get $ip$url\n" unless defined $reply; }
and then cat ip.txt | test_url.pl Something like this... Good luck, Rob
In Section
Seekers of Perl Wisdom