Changes

Talk:UltraVNC

227 bytes added, 13:13, 12 May 2009

ini configuration file does not use separator in crypted password

use Crypt::DES;

my ($password, $ini, $help, $man);

GetOptions('help|h' => \$help, 'man' => \$man, 'password|p=s' => \$password, 'ini' => \$ini) or pod2usage(2);

pod2usage(1) if $help;

pod2usage(-exitstatus => 0, -verbose =>2) if $man;

my $cryptpass = $cipher->encrypt($password);

~~print~~ # If ini file join(with '',reg use ','$ini = $ini ? '' : ',';print uc join($ini, map {unpack('H2', $_)} split //, $cryptpass), "\n";

__END__

Options:

--help this help

--password the password you want to crypt

--ini use ini style crypted password

=head1 OPTIONS

Print this help

=item B<--~~rne~~password>

Password to encrypt ~~for the windows~~ . =item B<--ini> Specify to use new ini style format.The registryformat use ',' separator.

=back

34

edits