--- trunk/bin/amt-repl.pl	2009/08/08 20:38:06	5
+++ trunk/bin/amt-repl.pl	2009/08/08 21:57:47	6
@@ -6,10 +6,14 @@
 use Devel::REPL::Script;
 
 use lib 'lib';
-use Intel::AMT::SOAP;
+use Intel::AMT::RemoteControl;
 
 my $host = $ENV{AMT_HOST} || die "export AMT_HOST=\n";
-warn "host: $host";
-Intel::AMT::SOAP::init();
+warn "host: $host ", '*' x length($ENV{AMT_PASSWORD}), $/;
+
+warn Intel::AMT::RemoteControl::Capabilities;
+
+Intel::AMT::RemoteControl::run( @ARGV ) if @ARGV;
+
 Devel::REPL::Script->new->run();