troubles with with base(2)

[ToddAndMargo via perl6-users]

Hi All,

Now what am I doing wrong?

    my $v = 0b00101101 ^ 0b00001001; say $v.base(2);
    one(101101, 1001)

It should be
    100100


Many thanks,
-T