$x=1;
print 'single quoted dollar x is $x';
print "\n";
print "double quoted dollar x is $x";
print "\n";