if ("$body =~ m/\.csv$/" cmp "$body =~ m/\.csv.xls$/")