Help for this page
use warnings; use strict; ... print qq{one way '${ \STR }' and another '${ +STREF }' \n}; print qq{and with another disambiguation '${ STREF() }' \n};
c:\@Work\Perl\monks>perl constant_interpolation_1.pl one way 'a string' and another 'ref to a string' and with another disambiguation 'ref to a string'