HPUX :: lvm. Função Perl para lidar com a estrutura HPUX LVM
Baixe Agora

HPUX :: lvm. Classificação e resumo

HPUX :: lvm. Tag

estrutura Módulo Perl. Função Perl. Hpux. estrutura HPUX LVM Lvm.

HPUX :: lvm. Descrição

Função Perl para lidar com a estrutura HPUX LVM Hpux :: lvm é um módulo Perl que leva a saída do LVM comandos vgdisplay e lvdisplay e pvdisplay e os coloca em um hash de hashes da seguinte maneira como exemplo: '/ dev / vg08' => hash (0x404214c8) ' Acto_pv '=> 4' alloc_pe '=> 4092' cur_lv '=> 2' cur_pv '=> 4' free_pe '=> 0' max_lv '=> 255' max_pe_per_pv '=> 1023' max_pv '=> 16' open_lv ' => 2 'pe_size_mbytes' => 4 'fisical_vols' => hash (0x40421510) '/ dev / dsk / c3t12d0' => hash (0x404215a0) 'free_pe' => 0 'pv_status' => 'Disponível' 'total_pe' = > 1023 '/ dev / dsk / c3t13d0' => hash (0x40421528) 'Free_pe' => 0 'pv_status' => 'disponível' 'Total_PE' => 1023 '/ dev / dsk / c3t14d0' => hash (0x40421564) 'Free_PE' => 0 'pv_status' => 'Disponível' 'Total_PE' => 1023 '/ dev / dsk / c3t15d0' => hash (0x404215dc) 'free_pe' => 0 'pv_status' => '' disponível '' total_pe '=> 1023' total_pe '=> 4092' total_pvg '=> 0' vgda '=> 8' vg_status '=>' 'Disponível' 'vg_write_access' => 'leia / gravação' 'lvols' => hash (0x4042166c) ' lvol1 '=> hash (0x40421684)' alocado_pe '=> 2046 'Current_le' => 2046 'lv_size' => 8184 'lv_status' => 'disponível / syncd' 'pv_data' => hash (0x4042178c) '/ dev / dsk / c3t14d0' => hash (0x404217a4) 'le_on_pv' = > 1023 'pe_on_pv' => 1023 '/ dev / dsk / c3t15d0' => hash (0x404217d4) 'le_on_pv' => 1023 'pe_on_pv' => 1023 'used_pv' => 2 'lvdata' => hash (0x404216b4) ' Alocado_pe '=> 2046' alocação '=>' estrito '' bad_block '=>' on '' consistency_recovery '=>' mwc '' current_le '=> 2046' io_timeout_seconds '=>' padrão '' lv_permission '=>' / write '' lv_size_mbytes '=> 8184' lv_status '=>' Disponível / Syncd '' Mirror_Copies '=> 0' agenda '=>' paralelo '' stripe_size_kbytes '=> 0' listras '=> 0' vg_name '=> '/ dev / vg08' 'lvol2' => hash (0x40422834) 'alocado_pe' => 2046 'current_le' => 2046 'lv_size' => 8184 'lv_status' => '' disponível / syncd '' pv_data '=> hash (hash) 0x4042293c) '/ dev / dsk / c3t12d0' => hash (0x40422984) 'le_on_pv' => 1023 'pe_on_pv' => 1023 '/ dev / dsk / c3t13d0' => hash (0x40422954) 'le_on_pv' => 1023 'pe_on_pv '=> 1023' usado_pv '=> 2' lvdata '=> tem H (0x40422864) 'alocado_pe' => 2046 'alocação' => 'estrito' "bad_block '=>' on '' consistency_recovery '=>' mwc '' current_le '=> 2046' io_timeout_seconds '=>' padrão '' lv_permission '=>' leia / write '' lv_size_mbytes '=> 8184' lv_status '=>' 'Disponível / Syncd' 'Mirror_Copies' => 0 'Schedule' => 'Parallel' 'stripe_size_kbytes' => 0 'listras' => 0 ' 'VG_NAME' => '/ dev / vg08'aach Atributo é o mesmo que a saída no comando, mas com sublinhados em vez de espaços de modo que "alocado PE" é "alocado". Eu também tive que adicionar atributos "físico_vols", "Lvols", "lvdata" e "pv_data". (Para dados de volume lógico) "Fisical_Vols" é uma reflexão de hash para todos os volumes físicos no VG "alternate_links" é uma reflexão de matriz em cada volume físico que contém todos os links para esse dispositivo (se houver). O primeiro elemento da matriz é "Nenhum" se não houver links. (Não listado acima, mas o seu sob "físico_vols" "lvols" é uma reflexão de hash para todos os grupos de volumes no VG "LV_Data" é uma reflexão de hash para a saída LVDisplays do volume lógico. "PV_DATA" é uma refreficiência hash para todos os Volumes físicos que compõem o grupo de volumes e quanto espaço eles usam em cada.Os dados podem ser acessados através dos métodos fornecidos (sub-rotinas) .Synopsis Meu $ lvminfo_data = novo HPUX :: LVMINFO (Target_Type => "Local", Persistente => "New", Access_Prog => "ssh", access_system => "localhost", accessor_user => "root"); $ aref2 = $ lvminfo_data-> get_all_volumegroups (); foreach $ vg (@ $ aref2) {print " Grupo de volume: $ vg "; push @save_vgs, $ vg; $ vg_save = $ vg;} $ arreef2a = $ lvminfo_data-> get_vg_physicalvols (volume_group => $ vg_save); imprimir" Físico vols em VG: $ vg_save "; foreach $ pvinvg (@ $ arreef2a) {print" $ pvinvg "; push @save_pvs, $ pvinvg; $ pvinvg_save = $ pvinvg;} requisitos: · Perl.

HPUX :: lvm. Software Relacionado