75 |
|
|
76 |
my $ve_id = sprintf('%d%03d', $ip_split[2], $ip_split[3]); |
my $ve_id = sprintf('%d%03d', $ip_split[2], $ip_split[3]); |
77 |
|
|
78 |
|
if ( $ve_id < 101 ) { |
79 |
|
$ve_id += 100; |
80 |
|
warn "# VEID moved to $ve_id because 0 .. 100 are reserved\n"; |
81 |
|
} |
82 |
|
|
83 |
print "VEID: $ve_id hostname: $hostname ip: $ip\n"; |
print "VEID: $ve_id hostname: $hostname ip: $ip\n"; |
84 |
|
|
85 |
warn ">> creating directories\n"; |
warn ">> creating directories\n"; |
149 |
vzctl('set', $ve_id, '--userpasswd', "$login:$passwd" ); |
vzctl('set', $ve_id, '--userpasswd', "$login:$passwd" ); |
150 |
} |
} |
151 |
|
|
152 |
runscript( $ve_id, 'custom/50-hypertable.sh' ); |
#runscript( $ve_id, 'custom/50-hypertable.sh' ); |
153 |
print "OK: $ve_id created\n"; |
print "OK: $ve_id created\n"; |