<>;
$A[$_]++&&exit-1for glob<>;
$B[$_]++&&exit-1for glob<>;