% perl -le 'print vec(0x0, 6,1)'
0