$" = '-';
$\ = 1;
print "foo$\"bar";