use Quantum::Superpositions;
$res1 = any(@vec1) < any(@vec2);
$res2 = all(@vec1) < all(@vec2);