HP XP20000/XP24000 Yönetici El Kitabı - Sayfa 10

Anahtar HP XP20000/XP24000 için çevrimiçi göz atın veya pdf Yönetici El Kitabı indirin. HP XP20000/XP24000 50 sayfaları. Hp storageworks xp disk array configuration guide: vmware (a5951-96106, september 2010)
Ayrıca HP XP20000/XP24000 için: Yayın Notu (13 sayfalar), Entegrasyon Kılavuzu (29 sayfalar), Yayın Notu (4 sayfalar), Yapılandırma Kılavuzu (42 sayfalar), Yapılandırma Kılavuzu (40 sayfalar), Yapılandırma Kılavuzu (40 sayfalar), Yapılandırma Kılavuzu (36 sayfalar), Yapılandırma Kılavuzu (36 sayfalar), Yapılandırma Kılavuzu (30 sayfalar), Yapılandırma Kılavuzu (36 sayfalar), Yayın Notu (5 sayfalar), Yapılandırma Kılavuzu (46 sayfalar), Yapılandırma Kılavuzu (46 sayfalar), Referans Kılavuzu (46 sayfalar), Yapılandırma Kılavuzu (40 sayfalar), Yapılandırma Kılavuzu (44 sayfalar), Yapılandırma Kılavuzu (38 sayfalar), Yapılandırma Kılavuzu (34 sayfalar), Yapılandırma Kılavuzu (30 sayfalar), Yapılandırma Kılavuzu (30 sayfalar)

HP XP20000/XP24000 Yönetici El Kitabı
command.pl example
#!/usr/bin/perl
use Net::Telnet;
my @stdinput = <STDIN>;
my $input;
my $output;
my $out;
my $host;
my $user;
my $pass;
my $local = 1;
my $cmd;
:
:
:
my $telnet = Net::Telnet->new(Host=>$host,Cmd_remove_mode=>1,Timeout=>180);
$telnet->login($user,$pass);
if ($ENV{'HORCMROOT'} ne "")
{
$cmd = "echo \"" . $input . "\" | " . $ENV{'HORCMROOT'} . "\\HORCM\\etc\\rmsra -auto timeout=" .
$ENV{RMSRATOV} . " testMU=" . $ENV{'RMSRATMU'} . " -XMLSTDOUT";
}
else
{
$cmd = "rm -f " . $txtname;
$telnet->cmd($cmd);
foreach my $line (@input)
{
$cmd = "echo \'" . $line . "\' >> " . $txtname;
$telnet->cmd($cmd);
}
$cmd = "cat " . $txtname . " | /HORCM/usr/bin/rmsra -auto timeout=" . $ENV{'RMSRATOV'} . "
testMU=" . $ENV{'RMSRATMU'} . " -XMLSTDOUT >" . $xmlname . " 2>" . $logname;
}
$telnet->cmd($cmd);
$cmd = "cat " . $logname . " >> " . $xmlname;
$telnet->cmd($cmd);
$cmd = "cat " . $xmlname;
my (@stdout, @stderr, $exit) = $telnet->cmd($cmd);
foreach my $line (@stdout)
{
if ($line =~ /^\s*<|wwn=/)
{
$output = $output . $line;
}
elsif ($line =~ /^\[RMSRA\]/)
{
print $line;
}
}
$out = "> " . $out;
open(OUT,$out);
print OUT $output;
close(OUT);
exit($exit/256);
10
Overview of HP StorageWorks XP Virtualization Adapter