11.15. Grouping, alternatives

Bonus: all the words with either 'aba' or 'ada' in them
Bonus: all the words with either 'aba' or 'eda' in them

/a[bd]a/

if ($line =~ /aba/  or $line =~ /eda/) {
}
if ($line =~ /aba|eda/) {
}
if ($line =~ /(ab|ed)a/) {
}