mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-02-01 07:19:24 +00:00
8 lines
120 B
Perl
8 lines
120 B
Perl
|
#!/usr/bin/perl
|
||
|
|
use strict;
|
||
|
|
|
||
|
|
my $user = $ARGV[0];
|
||
|
|
my $pass = $ARGV[1];
|
||
|
|
print "$user:".crypt($pass,"Fhem")."\n";
|
||
|
|
exit 0;
|