$magritte = pack q\C4\, split /,/, qq;  80, 101, 114, 108; ;

##</code><code>##

$magritte = "\u$^X";

##</code><code>##

# Under Construction