diff options
Diffstat (limited to 'packaging/Caldera/OpenLinux/make_smbpasswd.perl')
-rwxr-xr-x | packaging/Caldera/OpenLinux/make_smbpasswd.perl | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/packaging/Caldera/OpenLinux/make_smbpasswd.perl b/packaging/Caldera/OpenLinux/make_smbpasswd.perl deleted file mode 100755 index 2666c19666..0000000000 --- a/packaging/Caldera/OpenLinux/make_smbpasswd.perl +++ /dev/null @@ -1,13 +0,0 @@ -#!/usr/bin/perl -$X= "X" x 32; -$U="[U ]"; -$L="LCT-00000000"; -print("#\n# SMB password file.\n#\n"); - -while ( <> ) { - next unless (/^[A-Za-z0-9_]/); - chop; - @V = split(/:/); - printf( "%s:%s:%s:%s:%s:%s:%s\n", $V[0], $V[2], $X, $X, $U, $L, $V[4]); -} - |