use Quantum::Superposition; $they = any( 'Indians', 'Mets', 'Cubs', 'Giants', 'Yankees', 'White Sox' );