Help for this page

Select Code to Download

Select or download this

lscfg -vl hdisk*|perl -MList::Pairwise=mapp -00e'print mapp{$a=~/^(hdi
+sk\d+)/&&"$1 ",$b=~/Serial Number[.]+(\w+)/m&&"$1\n"}<>'