use warnings;
use strict;

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