use warnings;
use strict;

my $price = "50";
print "$_\n" for "<li>The price is \$$price</li>", '<li>The price is \$$price</li>';

##</code><code>##

<li>The price is $50</li>
<li>The price is \$$price</li>