@foostuffs = split /(?:tar)?bar/, $string;