小编yst*_*sth的帖子

有谁知道在 ubuntu 上为 arm 在 gcc 上编译 darwin 库的步骤吗？

我试图让Eclipse与基于GCC的ARM交叉编译器一起工作.

如何配置eclipse以将新工具链添加到其工具链列表中？

该工具链是一个Raisonance分布式GCC工具链:C:\ Program Files\Raisonance\Ride\arm-gcc\bin\arm-none-eabi-gcc.exe

Perl 状态的文档如果使用隐式关闭close,$.则不会重置open.我试图确切地看到这意味着什么,但无法让它发生.这是我的脚本:

use strict;
use warnings;
use autodie;
my @files = qw(test1.txt test2.txt test3.txt);

#try with implicit close
for my $file (@files){
    open my $fh, '<', $file;
    while(<$fh>){
        chomp;
        print "line $. is $_\n";
    }
    #implicit close here
}

以下是所有三个文件的内容:

line 1
line 2
line 3
line 4
line 5
line 6
line 7
line 8
line 9
line 10

因为我没有显式调用close,所以close应该使用隐式(我认为)并且$.不应该重置.但是,当我运行脚本时,我得到这个输出,显示$.重置:

line 1 is line 1 …

我看到了关于Perl $$ var的问题- 两个美元符号作为一个印记？并且该双美元符号用于取消引用

我有这个perl代码

sub sock_initialize {

    my $sock  = q{};
    my $port  = q{};

    # $name running
    my $max_count   = 250;
    my $timeout     = 5;
    my $max_retries = 36;

    # Get a port for our server.
    $sock = IO::Socket::INET->new(
        Listen    => SOMAXCONN,    # listen queue depth
        LocalPort => 0,
        Reuse     => 1
    );

    die "Unable to bind a port: $!" if !$sock;

    $port      = $sock->sockport();
    my $ip = inet_ntoa( scalar gethostbyname( $HOST ));
    my …

假设除了标点符号之外,两行文本逐字逐句对应.如何对它们进行垂直对齐？

例如:

$line1 = "I am English in fact";
$line2 = "Je suis anglais , en fait";

我希望输出如下:

I   am     English       in   fact
Je  suis   anglais   ,   en   fait  .

我根据我在SO上发布的先前问题的答案以及Learning Perl的"使用printf格式化输出"部分所学到的内容,提出了以下代码.

use strict;
use warnings;

my $line1 = "I am English in fact";
my $line2 = "Je suis anglais , en fait.";

my @array1 = split " ", $line1;
my @array2= split " ", $line2;

printf "%-9s" x @array1, @array1;
print "\n";
printf "%-9s" x @array2, @array2;
print "\n"; …

为什么我的脚本无法正常工作？

我关注了一段YouTube视频并为该人工作.

我使用ActiveState ActivePerl 5.12.2.1202在Windows上运行Perl

这是我微小的代码块.

print "What is your name?\n";
$name = <STDIN>;
if ($name eq "Jon") {
print "We have met before!\n";
} else {
print "We have not met before.\n";
}

代码会自动跳转到else语句,甚至不会检查if语句.

Perl的逻辑定义是否有等效的Bash运算符？类似于:

$a = $a // $b;

要么

$a ||= $b;

这个脚本将打印出来aaa.

当不匹配"禁用" 时$b =~ /disabled/,我如何得到否定因此返回？TRUE$b

IE浏览器.我想保留if语句,但想要$b !=~ /disabled/.

#!/usr/bin/perl

use warnings;
use strict;

my $a = 1;
my $b = "disabled";


if ($a == 1 && $b =~ /disabled/) {

    print "aaa\n";

}

在Eclipse和PadWalker中遇到Perl调试器的一些问题.以前只用于简单的单文件脚本.使用"my"声明的变量.它们在调试器"变量"窗口中看起来很好.

现在我正在使用其他人更复杂的脚本,我没有看到使用"我们的"声明变量.为了调查,我把它归结为一个非常简单的例子

junk.pl:

use strict;
use warnings;

require 'junk2.pl';

package Junk;
my $simon = "SOMETHING";
print "JUNK  " . $Junk2::james . "\n";
print "JUNK  " . $simon . "\n";

junk2.pl:

package Junk2;
our $james;
$james = "FOO";

1;

单步执行代码,可my $simon调试窗口中的可修改显示很好但变量our $james不显示.调试器工作正常:程序运行,输出窗口显示正确的输出...它只是无法显示的变量窗口$james.

下面的屏幕截图显示了问题.正如您所看到的$james,Junk2包中的变量打印正常,但不会出现在变量显示中.

一直在寻找一个解决方案,但找不到任何匹配好的东西...任何想法？

编辑:如果我使用Perl调试器,我发现我可以"看到"包变量: .

有没有办法在IDE中以友好的方式获得相同的输出,如padwalker节目？

谢谢你们到目前为止回答的人:)

虽然我没有看到任何具有相同名称但具有不同情况的模块,但仅仅是为了好奇,我试图安装Log :: Log4perl并且在安装期间我拼错它'Perl'代替'perl':

% cpan -i Log::Log4Perl 
Cannot install Log::Log4Perl, don't know what it is.

当我使用正确的名字时,情况进展顺利:

% cpan -i Log::Log4perl 

相同的名称但不同的情况可能会产生冲突 这背后有什么具体原因吗？