Need a script written - can anyone help?

[eglwolf]

I would like to have a script written that compares the trueuserdomain file with the accounts in home, and output a list of account in home which should be removed.

Can anyone help me with this I am not a coder, so I would not even know where to begin.

 

[chirpy]

Threw this together:

#!/usr/bin/perl
open (IN, "</etc/trueuserdomains") or die;
my @data = <IN>;
close (IN);
chomp @data;

my %users;
foreach my $line (@data) {
	my ($domain,$user) = split(/\s/,$line);
	$users{$user} = 1;
}

opendir (DIR, "/home") or die;
while ($file = readdir(DIR)) {
	if ((-d "/home/$file") and ($file !~ /^\./)) {
		unless ($users{$file}) {print "/home/$file is not a current cPanel user directory\n"}
	}
}
closedir (DIR);

 

[eglwolf]

Chirpy - THANKS YOU SO MUCH! YOU ROCK!!!