in reply to numeric manipulation

The previous replies were all too pretty...

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

:-)

Update: slightly less ugly?

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