小编Dan*_*ley的帖子

在Javascript中获取数字的绝对值

我想在JavaScript中获取数字的绝对值.也就是说,放下标志.我在数学上知道我可以通过平方数然后取平方根来做到这一点,但我也知道这是非常低效的.

x = -25
x = x * x 
x = sqrt(x)

// x would now be 25 
Run Code Online (Sandbox Code Playgroud)

在JavaScript中有没有办法简单地删除一个比数学方法更有效的数字的符号?

javascript

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

停止Vim在一个单词的中间包装线条

完成后:set wrap,Vim包裹比窗口更长的行.

但是,是否可以让Vim仅在空格上换行到新行,而不是在单词的中途?

vim

47
推荐指数
2
解决办法
6558
查看次数

D3选择SVG内的元素

我想在D3中创建一些图表.到目前为止爱它,但我有点卡住了.我想创建一个区域来保存数据点,另一个区域来保存轴和标签.我想我会比这更精细,以更高效地更新图表.但我遇到的问题是我似乎无法在SVG中选择子元素.

这是我有的:

var graph = d3.select('#Graph svg')
if (graph[0][0] == null){
    graph = d3.select('#Graph')
        .append("svg:svg")
        .attr("width",width)
        .attr("height",height)
        .attr("class","chart");
}

graph.append("svg:g")
    .attr("id","data")
Run Code Online (Sandbox Code Playgroud)

现在我还没有找到一种方法来选择该数据容器.我试过了

d3.select("#Graph svg data")
Run Code Online (Sandbox Code Playgroud)

但没有运气.有任何想法吗?

javascript svg d3.js

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

INSERT失败,因为以下SET选项仅在Perl Sybase中具有不正确的设置

我有以下Perl脚本:

use strict;
use warnings;
use DBI;

my $db_connect = 'dbi:Sybase:server=10.2.2.2\CATDB;charset=utf8;database=Dev';
my $db_username = "*****";
my $db_password = "*****";

my $dbh = DBI->connect($db_connect, $db_username, $db_password,{ RaiseError => 1, 
            PrintError => 1, 
            AutoCommit => 1,
            syb_chained_txn => 0, 
            syb_enable_utf8 => 1  } ) || die "Failed to connect to BORIS database: $DBI::errstr\n";

my $insertContractSQL2 = '
BEGIN
DECLARE @ContractID int
UPDATE dbo.Sequences SET NextContractID = NextContractID + 1
SET @ContractID = (SELECT NextContractID FROM dbo.Sequences)

SET ANSI_NULL_DFLT_ON, ANSI_NULLS, ANSI_PADDING, ANSI_WARNINGS, ARITHABORT, …
Run Code Online (Sandbox Code Playgroud)

sql sql-server perl

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

扩展Backus-Naur表格操作顺序

我正在创建一个非常简单的规则语言的正式规范,非常简单.我想使用EBNF,因为这是一个标准,但我无法弄清楚如何指定操作顺序.到目前为止,这是规范.

rule = statement, { (‘AND’|’OR’), statement};

variable = ‘$’,alphabetic character, {alphabetic character | digit};

statement = variable, [ ‘count’,[white space ],’>’,[white space],number ];

alphabetic character = "A" | "B" | "C" | "D" | "E" | "F" | "G"
                     | "H" | "I" | "J" | "K" | "L" | "M" | "N"
                     | "O" | "P" | "Q" | "R" | "S" | "T" | "U"
                     | "V" | "W" | "X" | "Y" | "Z" ;

number …
Run Code Online (Sandbox Code Playgroud)

grammar language-design rules ebnf operator-precedence

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

在plpgsql函数中的PostgreSQL CREATE TEMPORARY TABLE

我正在尝试创建一个执行此操作的函数:

drop table t_rv_openitem;
select * into t_rv_openitem from rv_openitem;
select * from t_rv_openitem;
Run Code Online (Sandbox Code Playgroud)

当涉及到PostgreSQL中的函数时,我有时会感到困惑并得到此错误:

发生了错误:

错误:语法错误在"DROP"处或附近第3行:DROP TABLE t_rv_openitem;

我知道这似乎是一个简单的任务,但我正在试图解决这个问题.

这是完整的函数create语句:

CREATE OR REPLACE FUNCTION adempiere.update_t_rv_openitem()
  RETURNS rv_openitem AS
$BODY$

Drop table t_rv_openitem;
select * into t_rv_openitem from rv_openitem;
select * From t_rv_openitem;

$BODY$
  LANGUAGE plpgsql VOLATILE
  COST 100;
ALTER FUNCTION adempiere.update_t_rv_openitem() OWNER TO adempiere; 
Run Code Online (Sandbox Code Playgroud)

postgresql temp-tables plpgsql

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

过滤掉不在集合中的字符

我试图过滤我通过我的系统的所有字符串,以便我只发出有效的字符.

允许以下内容.

a-z
A-Z
"-" (hypen, 0x24)
" " (space, 0x20)
"’" (single quote, 0x27)
"~" (tilde, 0x7E)
Run Code Online (Sandbox Code Playgroud)

现在我可以想出一个正则表达式来搜索这个集合中的字符.但我需要的是一个正则表达式匹配这个集合中的字符,所以我可以用任何东西替换它们.

有任何想法吗?

regex perl regex-negation

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

在Vim中使用插入符号复制单词的简便方法

我试图找到一种简单的方法来复制插入符号当前所在的单词.我知道我可以选择单词的前面:按v e y.但这看起来很疯狂,我可以简单地按*上面的单词来搜索它,肯定有更好的方法来复制这个单词.也许甚至在一键按下?

vi vim copy-paste

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

Perl调用存在于数组中的子例程

我想在Perl中创建一个状态机.为此,我有一个由statenames索引的数组.我可以把subs放到这个数组中.像这样:

   use constant {
    stInit          => 0,
    stHeader        => 1,
    stSalesHeader   => 2,
    stCatagory      => 3,
    stData          => 4,
    stTotal         => 5,
    stError         => 6, 
};

my $state = stInit;
my @actions;

$actions[stInit] = [sub{logState("Initial state entered",2) }];
$actions[stHeader] = [sub{logState("Header state entered",2) }];
$actions[stSalesHeader] = [sub{logState("Sales header state entered",2) }];
$actions[stCatagory] = [sub{logState("Category state entered",2) }];
$actions[stData] = [sub{logState("Data state entered",2) }];
$actions[stTotal] = [sub{logState("Total state entered",2) }];
Run Code Online (Sandbox Code Playgroud)

但后来我不知道如何调用子程序.我试过这个

$actions[$state]
Run Code Online (Sandbox Code Playgroud)

但这似乎不起作用.这可能还是完全关闭?

perl

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

TSQL由WITH定义的表的多种用法

我想我可能会误解为什么使用with命令.但任何人都可以看到我做错了什么.我想进行查询并将结果用于两件事.首先,我想使用这些值来插入另一个表.然后我想向用户显示结果.

所以我有这样的事情.

With temp as (
Select * from Table1 
)
INSERT INTO Table2 (table1_id) select id from temp
SELECT * from temp 
Run Code Online (Sandbox Code Playgroud)

我明白了

错误:无效的对象名称"temp".SQLState:S0002 ErrorCode:208

这不是with命令的用途吗?

t-sql sql-server with-statement

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