73 |
|
|
74 |
my @ip_split = split(/\./,$ip); |
my @ip_split = split(/\./,$ip); |
75 |
|
|
76 |
my $ve_id = sprintf('%d%03d', $ip_split[2], $ip_split[3]); |
# 192.168.42.1 -> 42 001 |
77 |
|
# 10.60.0.3 -> 60 003 |
78 |
|
# 10.60.1.42 -> 1 042 |
79 |
|
|
80 |
|
my $ve_id = sprintf('%d%03d', $ip_split[2] || $ip_split[1], $ip_split[3]); |
81 |
|
|
82 |
if ( $ve_id < 101 ) { |
if ( $ve_id < 101 ) { |
83 |
$ve_id += 100; |
$ve_id += 100; |
153 |
vzctl('set', $ve_id, '--userpasswd', "$login:$passwd" ); |
vzctl('set', $ve_id, '--userpasswd', "$login:$passwd" ); |
154 |
} |
} |
155 |
|
|
156 |
runscript( $ve_id, 'custom/50-hypertable.sh' ); |
#runscript( $ve_id, 'custom/50-hypertable.sh' ); |
157 |
print "OK: $ve_id created\n"; |
print "OK: $ve_id created\n"; |