my ( $vsan, $vname ) = ( $record =~ /^\s+vsan\s+(\d+)\s+name\s+(.+)/ );