perl -wE '$_ = "7-12"; say join " ", [/(\d+)-/]->[0]..[/-(\d+)/]->[0]'

##</code><code>##

perl -wE '$_ = "7-12"; say join " ", (/(\d+)-/)[0]..(/-(\d+)/)[0]'