小编bug*_*net的帖子

学习FreeBSD

一个完整的新手,其背景主要是Windows XP,通过FreeBSD手册并获得足够的掌握从头开始设置服务器的平均时间是多少?

windows-xp freebsd

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

哪种Blowfish算法最"正确"?

我正在运行Windows Server 2k8(也许这只是问题的一半?)无论如何,我用各种语言从不同的Blowfish模块中获得不同的值.有没有可以作为标准的依据?

对于以下示例,假设密钥是password和明文12345678.

一个.将算法设置为模式并检查的在线加密工具给出.我一直在使用这个作为我的参考点,无论是明智的还是其他的.BlowfishECBBase64 Encode the output2mADZkZR0VM=

湾 以下Perl代码使用Crypt::ECBMIME::Base64

use MIME::Base64;
use Crypt::ECB;
$crypt = Crypt::ECB->new;
$crypt->padding(PADDING_NONE);
$crypt->cipher('Blowfish') || die $crypt->errstring;
$crypt->key('password'); 
$enc = $crypt->encrypt("12345678");
print encode_base64($enc);
Run Code Online (Sandbox Code Playgroud)

2mADZkZR0VM=与PADDING_NONE(与上面的'a.'相比较)输出.但是,当padding设置为PADDING_AUTO输出时2mADZkZR0VOZ5o+S6D3OZw==,至少在我看来是一个错误,因为明文是8个字符长而且不需要填充.

C.如果我使用Crypt::Blowfish如下

#! c:\perl\bin 
use Crypt::Blowfish;
use MIME::Base64;

my $key;
my $plaintext;

$key = "password";
$plaintext = "12345678";

my $cipher = new Crypt::Blowfish $key; 
my $ciphertext = $cipher->encrypt($plaintext);
my $encoded = …
Run Code Online (Sandbox Code Playgroud)

php c vb6 perl blowfish

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

为什么Perl的bignum模块给出了功率计算的奇怪结果?

上下文:ActiveState Perl:这是为MSWin32-x86-multi-thread构建的perl 5,版本12,subversion 4(v5.12.4)

>perl -Mbignum=l -e "print 2 ** 32"
4294967296

>perl -Mbignum=l -e "print -2 ** 32"
-4294967296
Run Code Online (Sandbox Code Playgroud)

然后我开始思考,也许我需要划分负面的两个.

>perl -Mbignum=l -e "print (-2) ** 32"
-2
Run Code Online (Sandbox Code Playgroud)

终于想通了.

>perl -Mbignum=l -e "print ((-2) ** 32)"
4294967296
Run Code Online (Sandbox Code Playgroud)

所有括号怎么样?

perl activestate

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

如何扩展String类?

在javascript中扩展核心类很容易.我觉得它在C#中并不那么容易.我想在String类中添加一些内容,以便我可以执行以下操作:

string s = "the cat's mat sat";
string sql = s.smartsingleQuote();
Run Code Online (Sandbox Code Playgroud)

因此给了我

the cat''s mat sat
Run Code Online (Sandbox Code Playgroud)

这是否可行,还是我必须为此编写一个函数?

c# extending-classes

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

如何从USB设备恢复的数据中提取Word文档?

我已经能够将原始数据从其他无法访问的USB驱动器复制到大约250MB的单片文件中.在那个blob字节中的某个地方大约有40个Word文档.

  1. 我在哪里可以找到有关Word文档内部结构的文档,以便我可以解析字节流,识别Word文档的起始位置并完成并提取副本?

  2. 是否有任何特定于此任务的编程语言的库?

  3. 任何人都可以建议已经存在的软件解决方案吗?

ms-word data-recovery

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

如何计算复数的对数到'e'以外的基数?

我正在从我正在研究的项目中切掉一些VB6:

Public Function C_Ln(c As ComplexNumber) As ComplexNumber
    Set C_Ln = toComplex(Log(C_Abs(c)), Atan2(c.Imag, c.Real))
End Function
Run Code Online (Sandbox Code Playgroud)

VB6 Log()函数是base-e.我想做这个版本来做base-2,base-10和base-n.我从哪里开始?

vb6 math logarithm complex-numbers mixed-radix

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

在Google Adwords中,您如何以编程方式更改预算?

可悲的是,没有任何示例(我已经研究了一段时间)。

我希望能够以编程方式修改广告系列的预算。我可以看到BudgetService存在,但是我不知道如何(或去哪里找到方法)获取预算ID或预算名称。

我猜想人们必须查询广告系列的预算,从该budgetid导出,然后在BudgetService请求中使用它。是这样吗 如果没有,那怎么办?

google-adwords adwords-budgetservice

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

如何在F#中遍历String [] []

上下文:Microsoft Visual Studio 2015社区; F#

我一直在学习F#约半天.我有一个如何做函数式编程,从花了一年时间乱搞一个模糊的概念mLite.

以下脚本遍历文件夹树并提取日志文件.文件具有分隔的条目,~并且可能存在一个或多个.

open System
open System.IO

let files = 
    System.IO.Directory.GetFiles("C:\\scratch\\snapshots\\", "*.log", SearchOption.AllDirectories)

let readFile (file: string) = 
    //Console.WriteLine(file)
    let text = File.ReadAllText(file) 
    text

let dataLines (line: string) = 
    line.Split('~')

let data = 
    files |> Array.map readFile |> Array.map dataLines
Run Code Online (Sandbox Code Playgroud)

所以在这一点data包含一个String[][],我有点不知道如何把它变成一个String[],这个想法是我想把所有的日志转换成一个长向量,这样我就可以做一些其他的转换它.例如,每个日志行都以日期时间开始,因此将其全部转换为一个长列表,然后我可以对日期时间进行排序.

从哪里来?

f# visual-studio-2015

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

在Delphi中为Excel编写DLL

我正在使用Turbo Delphi 2006.

DLL将作为VBA/DLL组合的一部分从Excel中调用.

问题的第一部分是试图找出如何向DLL传递对当前Excel会话的引用.我见过的大多数其他代码都是它启动了一个单独的Excel实例,而不是你所在的实例.

我已经看到一些C++代码创建了一个实例,IDispatch然后将一些东西传递给IDispatch对象的方法,但不知道很多C++.

有任何想法吗?

delphi dll excel vba idispatch

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

如何在不损失速度或可读性的情况下重写这个来删除这些?

我写了这个.是的,我知道它是VB6.是的,它是生产代码,是的,我知道它使用了gotos.我是一个懒惰的,邪恶的野兽......

所以告诉我(以及我们其他人)应该如何写

Public Function SplitString(ByVal sText As Variant) As Variant
    Dim nHere As Long
    Dim cHere As String * 1
    Dim aRes As Variant
    Dim nRes As Long
    Dim bInquote As Boolean
    Dim sString As String
    ReDim aRes(0)
    nHere = 1
    nRes = 0
    Do
    If nHere > Len(sText) Then Exit Do
    cHere = Mid$(sText, nHere, 1)
    If cHere = Chr$(32) Then
        If bInquote Then
        sString = sString & cHere
        GoTo nextChar
        End If
        If sString <> vbNullString …
Run Code Online (Sandbox Code Playgroud)

string vb6 split goto

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