my @check = grep { chomp $_; $_ } <DATA>;