if ((grep {$_ eq 'Sun'} @arr1) && (grep {$_ eq 'Moon'} @arr1)) {
    print "We have both a sun and a moon - yay!\n";
}
else {
    print "Something is missing...\n";
}