vnc - 如何生成 VNC 密码？

Question

嗨，需要使用任何脚本(最好是 php 但任何 perl 都可以)生成 vnc 密码。

问题是“vncpasswd”需要交互式用户操作(提示输入密码和密码验证)。

有没有办法在没有提示的情况下生成它？

Answer 1

来自 here .

#!/bin/perl

use Crypt::CBC;

my $key = pack("C8", 23, 82, 107, 6, 35, 78, 88, 7);
$cipher = Crypt::CBC->new({
'key'=>$key, 'cipher'=>'DES', 'prepend_iv'=>0, 'regenerate_key'=>0
});

$ciphertext = $cipher->encrypt("This data is hush hush");
$plaintext = $cipher->decrypt($ciphertext);

print "Encrypted: $ciphertext\n";
print "Decrypted: $plaintext\n";