小编XoR*_*XoR的帖子

LWP :: UserAgent HTTP基本身份验证

我试着运行这个perl5程序:

 #!/usr/bin/env perl                                                             

use strict;                                                                     
use warnings;                                                                   
use LWP;                                                                        

my $ua = LWP::UserAgent->new('Mozilla');                                        
$ua->credentials("test.server.com:39272", "realm-name", 'user_name', 'some_pass');                       
my $res = $ua->get('http://test.server.com:39272/');                  

print $res->content;
Run Code Online (Sandbox Code Playgroud)

另一方面,我有HTTP ::守护进程:

#!/usr/bin/env perl                                                                                       

use strict;                                                                     
use warnings;                                                                   

use HTTP::Daemon;                                                               

my $hd = HTTP::Daemon->new or die;                                              

print "Contact URL: ", $hd->url, "\n";                                          
while (my $hc = $hd->accept) {                                                  
  while (my $hr = $hc->get_request) {                                           
    if ($hr->method eq 'GET') {                                                 
      print $hr->as_string, "\n";                                               
    }                                                                           
  }                                                                             
  $hc->close;                                                                   
  undef($hc);                                                                   
}    
Run Code Online (Sandbox Code Playgroud)

它只是打印:

Contact URL: http://test.server.com:39272/
GET / HTTP/1.1
Connection: TE, close …
Run Code Online (Sandbox Code Playgroud)

perl lwp lwp-useragent

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

简单的Slickgrid排序不起作用

是否有明显的理由说明为什么这个Slickgrid示例不起作用.基本上它不会点击列.

        var grid;

        var columns = [
        {id:"title", name:"Title", field:"title", sortable: true},
        {id:"duration", name:"Duration", field:"duration", sortable: true},
        {id:"%", name:"% Complete", field:"percentComplete", sortable: true},
        {id:"start", name:"Start", field:"start", sortable: true},
        {id:"finish", name:"Finish", field:"finish", sortable: true},
        {id:"effort-driven", name:"Effort Driven", field:"effortDriven", sortable: true}
        ];

        var options = {
            enableCellNavigation: true,
            enableColumnReorder: false
        };

        $(function() {
            var data = [];
            for (var i = 0; i < 500; i++) {
                data[i] = {
                    id: i,
                    title: "Task " + i,
                    duration: "5 days",
                    percentComplete: Math.round(Math.random() …
Run Code Online (Sandbox Code Playgroud)

javascript slickgrid

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

奇怪的irb行为,列出内容当前目录

当我在irb提示符中粘贴此代码时,我获得了当前目录的列表if true.

def some_method()

  if true
        raise StandardError
    end

end
Run Code Online (Sandbox Code Playgroud)

输出示例:

irb(main):151:0> def some_method()
irb(main):152:1> 
irb(main):153:1*   if true
irb(main):154:2> 
.Skype/                          .m2/                             Desktop/
...
Run Code Online (Sandbox Code Playgroud)

我用irb 0.9.5(05/04/13)ruby 1.8.7 (2011-12-28 patchlevel 357).

这是一个错误,还是其他什么?

ruby irb

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

为什么我在mod_perl下使用"use constant"获得"重新定义"警告?

我用apache2运行CGI脚本,我在error.log中有这个警告行(我从输出中删除了所有类似的行):

[Thu Jul 30 09:39:37 2009] upload.pl: Constant subroutine ModPerl::ROOT::ModPerl::Registry::home_stanislav_cgi_perl_upload_2epl::UPLOAD_DIR redefined at /usr/share/perl/5.10/constant.pm line 115,  line 133.
Constant subroutine
    ModPerl::ROOT::ModPerl::Registry::home_stanislav_cgi_perl_upload_2epl::BUFFER_SIZE redefined at /usr/share/perl/5.10/constant.pm line 115,  line 133 (#1)
[Thu Jul 30 09:39:37 2009] upload.pl: Constant subroutine ModPerl::ROOT::ModPerl::Registry::home_stanislav_cgi_perl_upload_2epl::BUFFER_SIZE redefined at /usr/share/perl/5.10/constant.pm line 115,  line 133.
Constant subroutine
    ModPerl::ROOT::ModPerl::Registry::home_stanislav_cgi_perl_upload_2epl::MAX_FILE_SIZE redefined at /usr/share/perl/5.10/constant.pm line 115,  line 133 (#1)
[Thu Jul 30 09:39:37 2009] upload.pl: Constant subroutine ModPerl::ROOT::ModPerl::Registry::home_stanislav_cgi_perl_upload_2epl::MAX_FILE_SIZE redefined at /usr/share/perl/5.10/constant.pm line 115,  line 133.
Constant subroutine
    ModPerl::ROOT::ModPerl::Registry::home_stanislav_cgi_perl_upload_2epl::MAX_DIR_SIZE redefined at /usr/share/perl/5.10/constant.pm line …

perl warnings cgi mod-perl

4
推荐指数
1
解决办法
3490
查看次数

为什么我的Perl程序没有输出任何文件?

我正在尝试写入文件〜/ .log但文件仍为空.我不知道为什么会这样,一切似乎都很好.

我的系统是Ubuntu 9.10amd64,Perl 5.10.

#!/usr/bin/perl
# vim:set filetype=perl:

use strict;
use warnings;

use LWP::Simple qw||;
use Net::SMTP;

# Only because log file
$| = 1;

my $match_string = "... some text to match ..." ;
my $content;

my @mails = ('mejl1@provider1.com',
        'mejl2@provider2.com',
        );
my $data = <<END;

... Subject text ...

END

open(my $log, ">>","$ENV{HOME}/.log")
or die "Couldn't open log file";

sub get( $ ) {
    my $content_ref = shift;

    print {$log} "get: Error: $!\n"
        until ( …
Run Code Online (Sandbox Code Playgroud)

perl

3
推荐指数
2
解决办法
558
查看次数

HBaseConfiguration不读取我在$ {HBASE_HOME} /conf/hbase-site.xml中设置的值

$ {HBASE_HOME} /conf/hbase-site.xml具有下一个值:

<property>
  <name>hbase.zookeeper.quorum</name>
  <value>hd1</value>
</property>
Run Code Online (Sandbox Code Playgroud)

"hd1"主机名设置在"/ etc/hosts"中,ping工作...

有了这个简单的Java程序:

import org.apache.hadoop.conf.Configuration;
import org.apache.hadoop.hbase.HBaseConfiguration;

public class TestConfigurator {

    /**
     * @param args
     */
    public static void main(String[] args) {
        Configuration conf = HBaseConfiguration.create();
        System.out.println("HBase quorum: " + conf.get("hbase.zookeeper.quorum", "localhost"));
    }
}
Run Code Online (Sandbox Code Playgroud)

我得到"localhost".HBase在分布式模式下设置,有一个主服务器和两个区域服务器......并且所有conf文件都已同步,我多次重启所有服务器.

有什么我错过了吗?

configuration hadoop hbase

2
推荐指数
1
解决办法
2746
查看次数