my ($result) = m[pattern(group)]? $1 : "default";