Help for this page
my (@rep) = /It contains ([^.]*)\./ && $1 =~ /\G(\S[^,]*)(?:,\s*)?/g;
my (@rep) = /It contains ([^.]*)\./ && split(/\s*,\s*/, $1);