小编Gre*_*con的帖子

作为scanf的格式说明符,%*c%c和%c之间有什么区别?

我通常会获得一个角色%c,但我看过使用过的代码%*c%c.例如:

char a;
scanf("%*c%c", &a);
Run Code Online (Sandbox Code Playgroud)

有什么不同?

c special-characters

4
推荐指数
2
解决办法
689
查看次数

perl后台进程

我试图在perl中运行后台进程.我创建了一个子进程,用于调用另一个perl脚本.我希望与这个子进程并行运行几行代码.子进程完成后.我想打印一行代码.

主要脚本

#!/usr/bin/perl

$|=1;

print "before the child process\n";

my $pid = fork();

if (defined $pid)
{
    system("perl testing.pl");
}

print "before wait command\n";

wait();

print "after 20 secs of waiting\n";
Run Code Online (Sandbox Code Playgroud)

testing.pl

#!/usr/bin/perl

print "inside testing\n";

sleep(20);
Run Code Online (Sandbox Code Playgroud)

预期产出

before the child process
before wait command
(should wait for 20 secs and then print)
after 20 secs of waiting

perl sleep fork background wait

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

使用.gitignore不提交bin,debug和config文件夹

我在我的ASP.NET MVC项目中使用git.

我想无论从文件debug,binconfig文件夹中的"待Chages"对话框中显示广告,因此我不会将它们提交到我的仓库.

这些文件是特定于机器的,特别是config文件夹.

我尝试将以下内容添加到.gitignore:

myproject\bin**
myproject\obj**
myproject\config\**
Run Code Online (Sandbox Code Playgroud)

这不起作用,因为在每次构建或配置更改后,仍会显示所有三个文件夹下的所有文件.

我究竟做错了什么?

git gitignore

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

如何使用 git 查找已删除的行?

有时,我想重新添加一些我前段时间从存储库中删除的代码。我总是使用诸如tig浏览历史记录之类的工具来查找删除了某些行的提交。

有没有办法用 git 找到删除的行?类似于git-grep但对于提交内容而不是提交消息?

git version-control

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

按值对多维散列进行排序并显示最高的

我具有%info以下结构的存储的多维哈希():

$info{$os}{$id}=$length;

foreach $os (keys %info){   
    foreach $id (keys %{$info{$os}}){
        print "$os $id => " . $info{$os}{$id} ."\n" if (keys %info > 100);
    }
}
Run Code Online (Sandbox Code Playgroud)

这样,我可以读取哈希并仅打印$os出现次数超过100 的哈希值,但是现在我只想打印$id具有最高$ length(即值)的值。因此,我想按值对散列进行排序并仅打印$os$id具有最高值。

有什么帮助吗?

sorting perl hash

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

在Haskell代数数据类型中选择备选方案

当类型X定义为:

data X = 
    X { sVal :: String } |
    I { iVal :: Int } |
    B { bVal :: Bool }
Run Code Online (Sandbox Code Playgroud)

我希望Int里面有一个X值,如果有的话,否则为零.

returnInt :: X -> Int
Run Code Online (Sandbox Code Playgroud)

如何确定X参数的类型returnInt

haskell types algebraic-data-types data-structures

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

URL Regex无效

使用Perl,我试图解析一堆XML文件,并尝试在XML中查找任何形式的URL并打印它.我的正则表达式似乎不起作用,它没有返回任何匹配.我错过了什么?

sub findURL{
local($inputLine, $outText);
$inputLine = $_[1];
 while (length($inputLine) > 0)
 {
 if ($inputLine =~ /^(((http|https|ftp):\/\/)?([[a-zA-Z0-9]\-\.])+(\.)([[a-zA-Z0-9]]){2,4}([[a-zA-Z0-9]\/+=%&_\.~?\-]*))*$/ )

 {
 $outText .= $&;
 $inputLine = $';
 }
 else
 {
  $inputLine = "";
  $outText .= "";
 }
 }
 return $outText;
}
Run Code Online (Sandbox Code Playgroud)

regex perl

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

如何多线程查看Perl中是否存在网页?

我正在写一个Perl脚本,它接收一个URL列表并检查它们是否存在.(请注意,如果存在的话,我只关心,我关心它们的内容下面是该方案的重要组成部分.

use LWP::Simple qw($ua head);

if (head($url))
{
    $numberAlive ++;
}
else
{
    $numberDead ++;
}
Run Code Online (Sandbox Code Playgroud)

现在该程序运行正常; 但是,我希望它运行得更快.因此我正在考虑将其设为多线程.我假设我的程序的慢速部分是联系服务器的每个URL; 因此,我正在寻找一种方法,在我等待第一个响应时,我可以向我列表中的其他网页的URL发送请求.我怎样才能做到这一点?据我所知,该head例程没有可以在服务器响应后调用的回调.

perl networking

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

如何使用 Strawberry 在 Windows 上编译 Perl 模块?

这更多的是一个公开的讨论和结论,而不是一个真正的问题,希望它能在某个时候帮助别人。

我正在寻找如何在与互联网断开连接的服务器上制作 Perl 模块(否则答案很简单:使用cpan),所以我唯一的选择是直接在服务器上手动编译从互联网(CPAN 或其他)下载的模块。

问题是,在标准 Windows 服务器上,没有编译器。那么如何制作模块呢?

windows perl compilation perl-module strawberry-perl

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

如何使用反引号来捕获从时间(1)输出的经过时间?

我正在尝试time使用以下命令获取输出.我唯一想要的是获得经过的时间,但我一无所获.

$result = `/usr/bin/time -f %e "./"$PROG > /dev/null`;
print $result;
Run Code Online (Sandbox Code Playgroud)

perl time

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