Does this pass a syntax, compilation and execution test? Yes.
Does it pass as a reasonable interp of op's use of "read" and/or a sanity test? I dunno!
#!/usr/bin/perl
use strict;
use warnings;
use 5.018;
# read_to_dblquoted_str.pl
my $str=qq(");
my $txt = "abcdef \$3.05 xyz"; # to minimize, assigning this way, st
+ed openning a file and reading it.
$str .= $txt . qq(");
say "\$txt: " . $txt;
say "\$str: " . $str;
=head
C:\> read_to_dblquoted_str.pl
$txt: abcdef $3.05 xyz
$str: "abcdef $3.05 xyz"
=cut