in reply to ODD: Perl started complaining about just everything

Look at the first of the psycho complaints, and then look backwards for an unmatched double quote mark ("). The first complaint, about the unquoted bareword, can only happen if perl thinks that descr is outside a string; therefore, it must think that there's some long string that ends with my $query3 = ".
-- @/=map{[/./g]}qw/.h_nJ Xapou cets krht ele_ r_ra/; map{y/X_/\n /;print}map{pop@$_}@/for@/