$ perl -le'print q{"$temp"}'
"$temp"

##</code><code>##

$ perl -le'$temp=q{Bread was $1.50}; print eval q{"$temp"}'
Bread was $1.50

$ perl -le'$temp=q{Bread was $1.50}; print "$temp"'
Bread was $1.50

##</code><code>##

'...'

##</code><code>##

sprintf('%s', '...')

##</code><code>##

$ perl -E'use strict; my $x = 10; eval q{ my $y = $x; }; say $y'
Global symbol "$y" requires explicit package name at -e line 1.
Execution of -e aborted due to compilation errors.

$ perl -E'use strict; my $x = 10; eval q{ my $y = $x; say $y };'
10

$ perl -E'use strict; my $x = 10; my $y; eval q{ $y = $x; }; say $y'
10

$ perl -E'use strict; my $x = 10; my $y = eval q{ $x }; say $y'
10