($am, $bm) = map {/$mask/ ? $1 : 0} @_;