Hi! I am trying to use a Perl script, as you see below, to change the home page for Internet Explorer, but I cannot come-up with the code that does the change. I am using the use Win32::OLE header to make a call to the system. This call allows the modifying of the file that needs to be edited in the system I do know.
Thanks in advance!
#!/usr/bin/perl
use Win32::OLE;
print "What url would you like to make as Internet Explorer's home page?\n";
print "(no spaces, the url as you normally see it on the adderess bar)\n";
chomp($url=<STDIN>);
while (!$url)
print "You did not make and entry! Please enter a url.\n";
chomp($url=<STDIN>);
exit;
}
while ($url)
{
if ($url eq " ")
{
print "That's not a url! You entered a space somewhere. Re-enter:\n";
chomp($url=<STDIN>);
}
else
{
*CODE TO CHANGE HOME PAGE HERE*
print "\nYour home page in IE has been changed! Re-open IE and see!";
}
exit;
}
jg1405 0 Newbie Poster
doubi 0 Newbie Poster
Be a part of the DaniWeb community
We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.