
$s = 12; @a = ('this', 'that');
print "\t$s\n@a\n";
print "======\n";
print '\t$s\n@a\n';


