my ($result)= m[pattern(group)] || "default";