### begin_: init perl
    use strict;
    use warnings;
    
    ### p__: standard perl libraries
    use YAML;
    use Data::Dumper;

### begin_: get sample data
    my  $sRaw   = join '',<DATA>;
    
### begin_: convert to YAML
    for ($sRaw){
    
        ### p__: scrub the top part
        s/libname=/\n-  domain: begin\n   libname: /gms;
        s/pathname=([^\s]+)/\n   pathname: "$1"/gms;
        s/owner=([^\s]+)/\n   owner: "$1"/gms;
        s/libaclinherit=([^\s]+)/\n   libaclinherit: "$1"/gms;
        s/dynlock=([^\s]+)/\n   dynlock: "$1"/gms;
        s/roptions=\x22//gms;

        ### p__: scrub the roption stuff
        for my $sOpt qw(datapath indexpath workpath metapath){
            s/\s+$sOpt=\x28([^\x29]+)\x29/\n   $sOpt: [$1]/gms;
        }

        ### p__: scrub the oddball stuff
        s/\n^\x20{4,}/,/gms;
        s/,\x2e{3}//gms;
        s/\x22;//gms;
        s/\x5d[\x2c\x20]+/\x5d/gms;

        $_ .= "\n";
    };

### begin_: display result
    ### p__: show raw converted to yaml
    print $sRaw;
    print "\n---\n";

    ### p__: show yaml converted to perl
    my  $oData   = YAML::Load($sRaw);
    print Data::Dumper->Dump([$oData], [qw(oDomains)]);


### begin_: end_perl
    1;
    __END__
libname=foo pathname=/path/to/metadata/foo owner=someuser libaclinherit=no dynlock=no
   roptions="
       datapath=('/data/path1'
                 '/data/path2'
                 '/data/path3'
                 ...)
       indexpath=('/indx/path1'
                  '/indx/path2'
                  '/indx/path3'
                  ...)
       workpath=('/work/path1'
                 '/work/path2'
                 '/work/path3'
                 ...)
       metapath=('/meta/path1'
                 '/meta/path2'
                 '/meta/path3'
                 ...)";
                 
                 
libname=foo pathname=/path/to/metadata/foo owner=someuser libaclinherit=no dynlock=no
   roptions="
       datapath=('/data/path1'
                 '/data/path2'
                 '/data/path3'
                 ...)
       indexpath=('/indx/path1'
                  '/indx/path2'
                  '/indx/path3'
                  ...)
       workpath=('/work/path1'
                 '/work/path2'
                 '/work/path3'
                 ...)
       metapath=('/meta/path1'
                 '/meta/path2'
                 '/meta/path3'
                 ...)";

##</code><code>##

-  domain: begin
   libname: foo 
   pathname: "/path/to/metadata/foo" 
   owner: "someuser" 
   libaclinherit: "no" 
   dynlock: "no"
   datapath: ['/data/path1','/data/path2','/data/path3']
   indexpath: ['/indx/path1','/indx/path2','/indx/path3']
   workpath: ['/work/path1','/work/path2','/work/path3']
   metapath: ['/meta/path1','/meta/path2','/meta/path3']

-  domain: begin
   libname: foo 
   pathname: "/path/to/metadata/foo" 
   owner: "someuser" 
   libaclinherit: "no" 
   dynlock: "no"
   datapath: ['/data/path1','/data/path2','/data/path3']
   indexpath: ['/indx/path1','/indx/path2','/indx/path3']
   workpath: ['/work/path1','/work/path2','/work/path3']
   metapath: ['/meta/path1','/meta/path2','/meta/path3']

##</code><code>##

$oDomains = [
              {
                'owner' => 'someuser',
                'indexpath' => [
                                 '/indx/path1',
                                 '/indx/path2',
                                 '/indx/path3'
                               ],
                'libaclinherit' => 'no',
                'libname' => 'foo',
                'workpath' => [...]
...
];