#!/usr/bin/env perl
use strict;
use warnings;
use YAML::XS;

my $data = LoadFile('file1.yml');
$data = LoadFile('file2.yml');

##</code><code>##

#!/usr/bin/env perl
use strict;
use warnings;
use YAML::XS qw(LoadFile);

my @files = qw( /tmp/file1.yml /tmp/file2.yml );

my $test = { };
foreach my $file ( @files ) {
    my $data = LoadFile($file);
    my $name = $data->{name};
    $test->{$name} = { %$data };
}

##</code><code>##

---
name: file1
---
name: file2

##</code><code>##

#!/usr/bin/env perl
use strict;
use warnings;
use YAML::XS qw(LoadFile);
use Data::Dumper;

my $data = LoadFile( '/tmp/test.yml' );
print Dumper($data);

##</code><code>##

$VAR1 = {
          'name' => 'file2'
        };

##</code><code>##

#!/usr/bin/env perl
use strict;
use warnings;
use YAML::Tiny;
use Data::Dumper;
 
my $data = YAML::Tiny->read('/tmp/test.yml');
print Dumper($data);

##</code><code>##

$VAR1 = bless( [
                 {
                   'name' => 'file1'
                 },
                 {
                   'name' => 'file2'
                 }
               ], 'YAML::Tiny' );

##</code><code>##

$VAR1 = {
          'name' => 'file1'
        };