215 |
push @args, SOAP::Data->name( 'IanaOemNumber' => $IanaNumbers->{IntelIanaNumber} ); |
push @args, SOAP::Data->name( 'IanaOemNumber' => $IanaNumbers->{IntelIanaNumber} ); |
216 |
warn "args ",dump( @args ); |
warn "args ",dump( @args ); |
217 |
|
|
|
|
|
218 |
_soap( @args ); |
_soap( @args ); |
219 |
|
|
220 |
} |
} |
221 |
|
|
222 |
|
sub boot { |
223 |
|
run qw/Reset/; |
224 |
|
} |
225 |
|
|
226 |
|
sub sol_boot { |
227 |
|
run qw/Reset IntelOemCommand UseSol/; |
228 |
|
} |
229 |
|
|
230 |
|
sub sol_boot_biossetup { |
231 |
|
run qw/Reset IntelOemCommand UseSol BiosSetup/; |
232 |
|
} |
233 |
|
|
234 |
|
sub ider_floppy_boot { |
235 |
|
run qw/Reset IntelOemCommand UseIderFloppy/; |
236 |
|
} |
237 |
|
|
238 |
|
sub ider_cd_boot { |
239 |
|
run qw/Reset IntelOemCommand UseIderCD/ |
240 |
|
} |
241 |
|
|
242 |
|
sub sol_ider_cd_boot { |
243 |
|
run qw/Reset IntelOemCommand UseSol UseIderCD/; |
244 |
|
} |
245 |
|
|
246 |
|
sub sol_ider_floppy_boot { |
247 |
|
run qw/Reset IntelOemCommand UseSol UseIderFloppy/; |
248 |
|
} |
249 |
|
|
250 |
1; |
1; |