use strict;
use warnings;
use File::Temp qw(tempfile);

my $temp = new File::Temp( UNLINK => 0, SUFFIX => '.txt' );
system ("pdftotext","-enc", "UTF-8","myfile.pdf","$temp");

local $/=undef;
open(my $fh, '<:encoding(UTF-8)', $temp) or die "Could not open file '$temp' $!";
print my $string = <$fh>;