summaryrefslogtreecommitdiff
path: root/packaging/Caldera/OpenLinux/make_smbpasswd.perl
diff options
context:
space:
mode:
Diffstat (limited to 'packaging/Caldera/OpenLinux/make_smbpasswd.perl')
-rwxr-xr-xpackaging/Caldera/OpenLinux/make_smbpasswd.perl13
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]);
-}
-