use IO::Prompter [ -style => 'bold', '-stdio', '-verbatim' ];
use File::Slurp qw/read_file/;
use IO::Prompter [ -style => 'bold', '-stdio', '-verbatim' ];
use File::Slurp qw/read_file/;
my ($meta, $name, $prefix) = @_;
my $filename = prompt '$prefix filename', -complete => 'filenames';
$meta->{files}{$name}{content} = read_file $filename;
my ($meta, $name, $prefix) = @_;
my $filename = prompt '$prefix filename', -complete => 'filenames';
$meta->{files}{$name}{content} = read_file $filename;