$sentence = q("The next color is $color.");

$color = q(blue);

print eval $sentence;