Регулярное выражение для разделения значений, соединенных символом в Perl

Question

У меня есть значения, в которых два числа разделены символом вроде «-».Например,

123-456
98765-4321
1-2345

Мне нужно разделить числа, которые находятся перед «-» и после него, на две разные переменные.Итак, для 123-456 я хочу разделить 123 на одну переменную и 456. на другую.

Как мне это сделать в Perl?

Answer 1

split(/-/, "123-456");   # => ("123", "456")

Answer 2

my $string = '123-456';
my ($first, $second) = split /-/, $string;

Answer 3

my ($before, $after) = /(\d+)-(\d+)/;