小编Jam*_*een的帖子

为什么"abcdef"不匹配(?= abc)def但匹配abc(?= def)?

在Javascript中,我有一个字符串abcdef,无法弄清楚这种奇怪的行为:

  • (?=abc)def 与字符串不匹配
  • abc(?=def) 确实匹配字符串

为什么?

javascript regex pcre

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

今天如何检查Perl周一?

我怎样才能检查Perl今天是星期一?

需要安装哪些模块?

任何人都可以帮我一个例子吗?

perl perl-module

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

不止一次加入同一张桌子

我可能有点傻,希望有人可以提供帮助.

我有一个简单的2列用户表(ID,USERNAME).
我有一个图像评论表(评论,评论,评论)

COMMENTFROM是发表评论的用户的ID.COMMENTTO是添加注释的图像所有者的ID.两个用户都在USERS表中.

我想拉出并显示这样的行

"really nice photo" - to USERXYZ - from USER123**
Run Code Online (Sandbox Code Playgroud)

这让我感到困惑,因为如果我将USERS表加入评论表:

WHERE comments.userfrom = users.id
Run Code Online (Sandbox Code Playgroud)

这只能得到我每行所需的2个用户名中的一个(或另一个).有没有办法可以同时获得两者?

我甚至不确定如何在SOF上搜索这个答案,如果之前已经回答过道歉.如果有人能指出我正确的方向,将不胜感激:)

mysql sql

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

如何在每个星期六的特定时间运行脚本?

在unix系统下..

我想在每个星期六运行一个perl脚本A.pl.我尝试了下面的代码,它的工作原理.但我想知道是否存在任何其他代码可以工作,但不会在繁忙的循环中继续检查时间?

while(1)
{
        @Time = localtime();
        if( $Time[6] eq "6" )
        {
                `perl A.pl`;
        }
}
Run Code Online (Sandbox Code Playgroud)

unix perl cron scheduled-tasks

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

使用unicode显示欧元符号并将字符更改为大写

我必须使用Java来实现这一目标

第1部分:使用字符原始数据类型输出€188.使用Unicode作为欧元符号€

第2部分:将以下char变量'j''o''e'更改为大写JOE并输出结果.

我用过这段代码,我错过了什么?

public class Test27 {

    public static void main (String args[]){
    System.out.println("\u20ac" +"188");

    String changeCase= "joe";

    String result;
    result=changeCase.toUpperCase();

    System.out.println( result);        
    }
}
Run Code Online (Sandbox Code Playgroud)

干杯

java unicode capitalization

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

在shell脚本中调用perl子例程

我制作了一个Perl模块,MyModule.pm其中包含一些getText我想在shell脚本中调用的子例程。我尝试了以下方式,但它给出了错误;

SEC_DIR=`perl -MMyModule -e 'getText'`; # line 1
echo $SEC_DIR
exit 0
Run Code Online (Sandbox Code Playgroud)

返回错误;

Can't locate MyModule.pm in @INC (@INC contains: /usr/lib/perl5/5.10.0/x86_64-linux-thread-multi /usr/lib/perl5/5.10.0 /usr/lib/perl5/site_perl/5.10.0/x86_64-linux-thread-multi /usr/lib/perl5/site_perl/5.10.0 /usr/lib/perl5/vendor_perl/5.10.0/x86_64-linux-thread-multi /usr/lib/perl5/vendor_perl/5.10.0 /usr/lib/perl5/vendor_perl .).
Run Code Online (Sandbox Code Playgroud)

BEGIN失败-编译中止。

PS:.pm文件和.sh在同一位置。我尝试过的其他选择;

第1行:

SEC_DIR=`perl -MMyModule -e '&getText'`;
SEC_DIR=`perl -MMyModule -e 'use MyModule; getText'`;
SEC_DIR=`perl -e 'use MyModule; getText'`;
Run Code Online (Sandbox Code Playgroud)

shell perl perl-module

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

使用perl cgi来获取cookie

我正在尝试在cgi脚本中检查cookie值; 我的测试脚本看起来像

#!/usr/bin/perl -w
use DBI;
use CGI qw/:standard/;
use CGI::Cookie;

my $cgiH = CGI->new;

print header;
print start_html(-title=>'Cookie Terms'), h1("Cookie Terms"), "<hr>\n";

%cookies = CGI::Cookie->fetch;
foreach $k (keys %cookies) {
    my $term = "$cookies{$k}";
    my $term =~ s/SubjectTerm//;
    print "at $k is $term \n";
}

print end_html;
Run Code Online (Sandbox Code Playgroud)

脚本的相关输入(来自HTTP GET)是

Cookie: SubjectTerm1=ponies
Cookie: SubjectTerm2=horses
Run Code Online (Sandbox Code Playgroud)

(这可以通过使用fiddler或调试我的delphi应用程序中的代码来验证).我的脚本(省略HTML包装器)的结果是

at SubjectTerm1 is  
at SubjectTerm2 is  
Run Code Online (Sandbox Code Playgroud)

或者如果我将print语句更改为

print "at $k is $cookies{$k}\n";
Run Code Online (Sandbox Code Playgroud)

它是

at SubjectTerm1 is SubjectTerm1=ponies; path=/
at SubjectTerm2 is SubjectTerm2=horses; path=/
Run Code Online (Sandbox Code Playgroud)

我想要到达的是这样的

at …
Run Code Online (Sandbox Code Playgroud)

cookies perl cgi

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

MySQL中的多个内连接?

我正在尝试与MySQL进行多个内部联接,但我不断收到以下错误

#1064 - 您的SQL语法有错误; 查看与您的MySQL服务器版本对应的手册,以便在'on codes.code = votes.code ORDER BY date desc LIMIT 0,30'第2行附近使用正确的语法

SELECT * FROM codes 
INNER JOIN user ON codes.userid = user.gid
INNER JOIN on codes.code = votes.code
ORDER BY date desc
Run Code Online (Sandbox Code Playgroud)

我这样做了吗?

mysql join

0
推荐指数
1
解决办法
125
查看次数