Like the following...

#!/usr/bin/perl
use strict;
use warnings;
use Safe;

my $data = Safe->new()->rdo('./data_to_import.dat');
[download]

cp
----
"Never be afraid to try something new. Remember, amateurs built the ark. Professionals built the Titanic."