some one help me on this know ....:-(
HI, I have written a script to get the text from PopupWindow.But when i run it is showing error in IEAutomation.pm like this -
- -Use of uninitialized value $counter in numeric le(<=) at E:/Perl/site
-
+/lib/win32/IEAutomation.pm line 537
-
-Can't call method "title" on an undefined value at E:/Perl/site/lib/w
-
+in32/IEAutomation.pm line 542.
Following is my perl script -
- #!/usr/bin/perl
-
use Win32::OLE;
-
use Win32::IEAutomation;
-
$IE = Win32::OLE->new("InternetExplorer.Application")
-
|| die "Could not start Internet Explorer.Application\n";
-
$IE = Win32::IEAutomation->new( visible => 1, maximize => 2);
-
$IE->gotoURL('http://10.255.114.191/snmpconfig.html');
-
$IE->getButton('caption:',"Configure SNMP v1/v2c" )->Click;
-
open(OUT, "E:/test/input.txt") || die;
-
@lines = <OUT>;
-
foreach $value (@lines)
-
{
-
$IE->getTextBox('name:',"get_comm_name")->SetValue("$value");
-
$IE->getButton('caption:',"Apply")->Click;
-
sleep 5;
-
my $popup = $ie->getPopupWindow("Request Acknowledged-Phaser 4510DT");
-
$popup->getTable('id:', "headingtext")->Click;
-
}
-
close OUT;
Please anyone give me solution for this