in reply to A perl riddle #1

15 bits

$1 00100100 00100011 $! 00100100 00100001