$ perl -E'my ($lower, $upper) = split(/-/, pop); say for $lower .. $upper' 88-99 88 89 90 91 92 93 94 95 96 97 98 99