Select Code to Download

use strict;
use warnings;
my @arr1  = ("Sun", "Moon", "Venus", "Pluto", "Neptune"); 
((grep/^(Sun|Moon)$/, @arr1) == 2) ? (print "True") : (print "False");