print "\x{0001}";
print "\N{U+1}";
print "\N{START OF HEADING}";
print chr(1);
print v1;
print "x"^"y";
vec(my $x,0,8)=1; print $x;