小编dao*_*oad的帖子

定义列表是一种标记信息的好方法，其中某些关键字与一个或多个值相关联。

由于 dt 与一个或多个dd 元素之间存在语义关联，因此是否有一种方法可以使用 CSS 来选择这些关联项。

考虑以下 html：

<dl>
  <dt>Foo</dt><dd>foo</dd>
  <dt>Bar</dt><dd>bar</dd>
  <dt>Baz</dt><dd>baz</dd>
</dl>

如果我想将此 dl 呈现为：

-------  -------  -------
| Foo |  | Bar |  | Baz |
| foo |  | bar |  | baz |
-------  -------  -------

我需要一种方法来表示 dt/dd 对第一个向左浮动、获得边框等等。

现在，我知道如何执行此操作的唯一方法是为每组 dt/dd 元素制作单独的 dls：

<dl>
  <dt>Foo</dt><dd>foo</dd>
</dl>
<dl>
  <dt>Bar</dt><dd>bar</dd>
</dl>
<dl>
  <dt>Baz</dt><dd>baz</dd>
</dl>

从语义的角度来看，这是残酷的，这些项目都是一个列表的成员。

那么是否有一个选择器或选择器组合允许我对 dt/dd 元素组进行操作？

更新

我正在寻找/提议的是类似伪元素的东西list-item，其中 dl:list-item 会选择一个dt和所有关联元素作为一个项目，与伪元素允许选择一组字符的dd方式大致相同first-line作为一个单位。

我继承了一个应该可以部署到其他服务器的项目.该项目具有许多简单的模块依赖关系,但可能并不存在于所有目标计算机上.

因此,我希望能够运行一个命令行脚本来检查安装了哪些Perl模块,并尝试通过CPAN自动安装缺少的模块.

因为这应该是非常基本的(即需要安装运行模块安装程序的东西会打败这一点)所述脚本应该只使用Perl 5.8.8核心模块.

有类似的东西已经存在或我需要自己编写吗？

我有一个perl脚本,script.pl,当运行时,它执行一个fork,父进程将其pid输出到一个文件,然后在子进程输出某些东西到STOUT然后进入while循环时退出.

$pid = fork();

if ( ! defined $pid ) 
{
    die "Failed to fork.";
}
#Parent process
elsif($pid)
{
    if(!open (PID, ">>running_PIDs"))
    {
        warn "Error opening file to append PID";
    }
    print PID "$pid  \n";
    close PID;
}
#child process
else
{
    print "Output started";

    while($loopControl)     
    {
           #Do some stuff
    }
}

当我在本地调用它时,这工作正常,即:perl script.pl.

该脚本打印出一些东西,然后将控制权返回给shell.(当子进程在后台进入循环时).

但是,当我通过ssh调用它时,控件永远不会返回到shell(也不会打印出"Output started"行).

ie:$ ssh username@example.com'perl script.pl'

然而,有趣的是,子进程确实运行(当我输入ps时我可以看到它).

任何人都可以解释发生了什么？

编辑:

我在调试下运行它得到了这个:

由于两个调试器争用相同的TTY,输入严重纠缠.

我知道如何仅在xterms和OS/2控制台中将输出切换到不同的窗口.对于手动切换,将创建的TTY的名称放在$ DB :: fork_TTY中,或者定义一个返回此功能的DB :: get_fork_TTY()函数.

在类UNIX系统上,可以通过键入tty获取给定窗口的TTY名称,并通过sleep 1000000将shell与TTY断开连接.

几年前,我读了一篇关于分析大型代码库的简洁方法的文章.

我们的想法是缩小到目前为止压痕和块长度的模式都是真正可见的.

作者写了关于使用非常小的字体打印代码并查看10英尺后面的结果的文章.我相信作者还有一些工具可以重新格式化代码并为这种技术生成图像,从而可以避免使用纸张.

我无法找到合适的搜索查询来实现这一目标.有人有主意吗？

我正在研究8051上的每个字节都很重要的项目.因此,我正在使用一些全局变量,而我通常不会这样做.将指针传递给函数的常规方法在这里增加了太多的开销.

我有许多函数使用单个位变量(C的编译器特定扩展)来表示除了正常返回值之外的函数结果.

bit global_error_flag = 0;
bit global_data_ready_flag = 0;

unsigned char A_Function (void) {
    // Do some stuff

    if ( badness ) {
        global_error_flag = 0;
        global_data_ready_flag = 1;

        return 0;
    }

    if ( data_is_ready_use ) {
        global_data_ready_flag = 1;
    }

    return a_value;    
}

void Other_Function (void) {
    unsigned char c;

    c = A_Function();

    if( global_error_flag) {
        // Do error stuff here.
    }
    else
    if( global_data_ready_flag ) {
        // Do data processing here.
    }
    global_error_flag = 0; …

是否有任何Wheel/POCO/Option使用POE模块在Perl中执行此操作:我想监视DB表以查找已更改的记录(删除/插入/更新)并相应地对这些更改做出反应.

如果是,可以提供一些代码或显示此链接？

我可以使用正则表达式作为参数在Moose中使用isa吗？如果不可能,我可以用其他东西来实现同样的东西->isa吗？

好的,有以下类型 Animal::Giraffe,Animal::Carnivore::Crocodile我想做,我->isa(/^Animal::/)可以这样做吗？如果我不能,我可以用什么来达到预期的效果？

我有一个包含多个变量的类,其中一个是散列(_runs):

sub new
{
    my ($class, $name) = @_;
    my $self = {
        _name => $name,
        ...
        _runs => (),
        _times => [],
        ...
    };
    bless ($self, $class);
    return $self;
}

现在,我要做的就是创建一个访问器/ mutator,以及另一个将新数据推入哈希的子例程.但我有一段时间让所有引用/解除引用/ $ self调用一起工作.我用"不能使用字符串("blah")作为HASH ref等等"烧毁我的眼睛"错误.

对于访问者来说,返回哈希的"最佳实践"是什么？我应该使用以下哪个选项(如果有的话)？:

return $self->{_runs};
return %{ $self->{_runs} };
return \$self->{_runs};

此外,当我在类中的其他子例程中使用哈希时,我使用什么语法来复制它？

my @runs = $self->{_runs};
my @runs = %{ $self->{_runs} };
my @runs = $%{ $self->{_runs} };
my @runs = $$self->{_runs};

迭代键是一样的:

foreach my $dt (keys $self->{_runs})
foreach my $dt (keys %{ $self->{_runs} })

那么实际添加数据呢？ …

我刚刚建立了Rakudo和Parrot,以便我可以玩它并开始学习Perl 6.我下载了Perl 6书并愉快地输入了第一个演示程序(网球锦标赛示例).

当我尝试运行该程序时,出现错误:

Divide by zero
current instr.: '' pc -1 ((unknown file):-1)

我perl6在构建目录中有我的二进制文件.我在rakudo构建目录下添加了一个脚本目录:

  rakudo
  |- perl6
  \- scripts
     |- perlbook_02.01
     \- scores

如果我尝试从我的脚本目录运行一个简单的hello world脚本,我会得到同样的错误:

#!/home/daotoad/rakudo/perl6

use v6;
say "Hello nurse!";

但是,如果我从rakudo它运行的目录运行它.

听起来我需要设置一些环境变量,但我不知道给它们的是什么和什么值.

有什么想法吗？

更新:

我宁愿不安装rakudo,我宁愿只是从build目录运行.这将允许我在我尝试不同的Perl6版本时(Rakudo*即将推出)将我对系统的更改保持在最低限度.

README文件鼓励我认为这是可能的:

   $ cd rakudo
   $ perl Configure.pl --gen-parrot
   $ make

Run Code Online (Sandbox Code Playgroud)

这将在当前(rakudo)目录中创建"perl6"或"perl6.exe"可执行文件.然后可以使用如下命令从构建目录运行程序:

   $ ./perl6 hello.pl

Run Code Online (Sandbox Code Playgroud)

在重新阅读时,我发现了一个事实,即在构建目录之外运行脚本之前必须安装rakudo:

一旦构建,Rakudo的make install目标将把Rakudo及其库安装到用于创建它的Parrot安装中.在执行此步骤之前,make上面创建的"perl6"可执行文件只能从Rakudo的构建目录的根目录中可靠地运行.make install执行完后,可以从任何目录运行已安装的可执行文件(只要用于创建它的Parrot安装保持不变).

所以看起来我需要安装rakudo来玩Perl 6.

接下来的问题是,安装rakudo的地方？README说用于构建的Parrot安装.

我--gen-parrot在我的构建中使用了该选项,它看起来像是安装的rakudo/parrot-install.所以rakudo会安装到我的rakudo\parrot-install？

阅读Makefile,支持这个结论.我跑了make install,它确实安装了parrot_install …

以下两个陈述之间的区别在哪里？

print "surname=" ,$myVal, "\n";

和

print "surname=" .$myVal. "\n"

我测试了它们,两者都返回相同的结果.甚至还有区别吗？

谢谢