modified wrapper to handle alternc_lxc via xinetd

This commit is contained in:
François Serman 2013-04-21 10:14:55 +00:00
parent 3733a0d787
commit aaaf7f3f62
1 changed files with 2 additions and 9 deletions

View File

@ -2,13 +2,6 @@
my $line = <>;
my $nb = int(rand(42));
if ($nb % 2 == 0) {
print "Error message here||\n";
} else {
print "Ok|127.0.0.1:4242|localhost:4242\n";
my ($action,$login,$pass,$uid) = split /|/, $line;
printf("Hi %s (%d) do you want to %s? -> btw your pass is %s\n", $login, $uid, $action, $pass);
}
my ($action,$login,$pass,$uid) = split /|/, $line;
print `alterc_lxc $action $login $pass $uid`;