#!/usr/bin/perl

use strict;
use warnings;
use File::Slurp;
use YAML::Dumper;

my $file   = '/path/to/table.txt';
my $dumper = YAML::Dumper->new;
$dumper->indent_width(4);
print $dumper->dump( scalar read_file($file) );