if ($value_add gt 0){ foreach $value (@value_add){ print "Is $value an attribute (y or n)? "; $response = ; chomp($response); if ($response =~ "y" || $response =~ "Y"){ print "response is $response\n"; print "configure as an attribute\n"; } else { print "response is $response\n"; print "configure as a parser\n"; } } # end foreach $value (@value_add) }