小编Joh*_*ohn的帖子

如何找出浏览器连接的服务器IP地址(使用JavaScript)?

有什么办法可以找到浏览器所连接的服务器的IP吗?例如,如果浏览器正在访问http://www.google.com,我们能否以任何方式告诉它连接到哪个IP?这在实施循环DNS的情况下非常有用.因此,第一个请求a.com结果1.1.1.1和后续请求结果1.1.1.2等等.

我用JavaScript无法找到任何方法.它甚至可能吗?如果没有,有没有任何通用的方法来找到这个信息?

javascript

25
推荐指数
5
解决办法
10万
查看次数

如何替换Perl哈希键?

让我们说如果我有这样的哈希:

$data = {
    'key1' => {
                'key2' => 'value1'
              },
    'key3' => {
                'key4' => {
                            'key5' => 'value2'
                          }
              },
  };
Run Code Online (Sandbox Code Playgroud)

现在,如何将键'key5'替换为其他键名称'key6'?我知道如何遍历哈希并转储值,但我不知道如何替换键或值.谢谢你的帮助.

perl hash replace

19
推荐指数
2
解决办法
2万
查看次数

Ruby相当于Perl Data :: Dumper

我正在学习Ruby和Perl有一个非常方便的模块Data :: Dumper,它允许你递归地分析数据结构(比如哈希)并允许你打印它.这在调试时非常有用.Ruby有类似的东西吗?

ruby perl-module

17
推荐指数
1
解决办法
6407
查看次数

如何在Perl发行版中仅运行特定测试?

这个问题与我之前提出的这个问题有关.我有多个测试文件(At,Bt,Ct等),用于测试各自的模块A,B,C等.但是当我进行make测试时,它会运行所有测试.但是,当我在一个特定模块上工作时说B,我想为该模块运行单元测试.在完成我的更改后,我将运行整个套件.

那么有什么方法可以做make test B,只运行Bt的测试?当我说"make all all"之类的东西时,它会运行"t"目录下的所有测试?谢谢.

testing perl unit-testing

14
推荐指数
1
解决办法
1940
查看次数

如何使用css选择器提取属性值?

我想选择元素属性的值.例如,如果我有一个输入元素

<input type="text" name=myInput value="100">
Run Code Online (Sandbox Code Playgroud)

我可以使用它找到它input[name='myInput'],但是如何使用css选择器获取它的值?

顺便说一下,我正在尝试使用css选择器在Selenium中执行此操作

java selenium css-selectors

6
推荐指数
2
解决办法
2万
查看次数

如何在同一分发中为多个Perl模块设计单元测试?

我一直在开发一个内部框架,它是用一堆Perl模块设计的.所有这些模块都依赖于一个暴露一些Win32功能的模块.例如,A,B,C,D等模块都依赖于单个模块Z.因此所有这些模块都将通过"使用MyFramework :: Z"导入.所有这些模块A,B,C等可以单独使用,也不依赖于任何其他框架模块.

现在,考虑到这个简单的设计 - 我如何设计我的单元测试.我打算使用Test :: More来完成所有的单元测试.我应该为每个模块编写单独的单元测试吗?有25个不同的模块属于这个框架.有什么建议?

perl unit-testing

5
推荐指数
1
解决办法
140
查看次数

Perl类变量用法

我试图了解如何在Perl OO中使用实例变量 - 更具体地说,与外部资源结合使用.让我解释:

我们有一个DLL,它暴露了我想通过Perl API公开的一些功能.我使用Win32 :: OLE来访问此DLL.所以我的构造函数很简单:

package MY_CLASS;
use Win32::OLE;

sub new
{
    my ($class) = @_;

    # instantiate the dll control
    my $my_dll = Win32::OLE->new("MY_DLL.Control");

    my $self = {
        MY_DLL => \$my_dll,
    };

    bless $self, $class or die "Can't bless $!";
    return $self;
}

sub DESTROY
{
    my ($self) = shift;
    undef $sef->{MY_DLL};
}
Run Code Online (Sandbox Code Playgroud)

如您所见,我正在为实例变量MY_DLL分配引用$my_dll.我有几个问题:

1)如何调用实例变量,因为它指向引用.那么,换句话说,如何在实例化的dll上调用方法,如下所示:

my $dll_class = new MY_CLASS;
$dll_class->{MY_DLL}->launch();
Run Code Online (Sandbox Code Playgroud)

假设launch()是由dll公开的方法.但是由于{MY_DLL}指向一个引用,Perl抱怨这是可以理解的.语法是什么?

2)我是否需要特别undef在DESTROY?即使我不具体,undef它也会自动清理Perl 吗?

perl

3
推荐指数
1
解决办法
1280
查看次数