浏览代码

testing code got checked in - removing...

Aditya Ivaturi 14 年之前
父节点
当前提交
27879bd6d3
共有 1 个文件被更改,包括 0 次插入4 次删除
  1. 0 4
      driver-example.pl

+ 0 - 4
driver-example.pl

@@ -1,7 +1,6 @@
 #!/usr/bin/perl
 #!/usr/bin/perl
 use Selenium::Remote::Driver;
 use Selenium::Remote::Driver;
 use Test::More tests=>4;
 use Test::More tests=>4;
-use Data::Dumper;
 
 
 my $driver = Selenium::Remote::Driver->new;
 my $driver = Selenium::Remote::Driver->new;
 $driver->get("http://www.google.com");
 $driver->get("http://www.google.com");
@@ -12,7 +11,4 @@ is($driver->get_title,'Google',"Title is google");
 ok($driver->get_title eq 'Google','Title equals google');
 ok($driver->get_title eq 'Google','Title equals google');
 like($driver->get_title,qr/Google/,"Title matches google");
 like($driver->get_title,qr/Google/,"Title matches google");
 
 
-print $driver->set_window_position(100,100);
-print Dumper($driver->get_window_position());
-
 $driver->quit();
 $driver->quit();