$_ = $parameter;
$parameter =~ /^([0-9]+)d([0-9]+)/;

$n_dice     = $1;
$n_sides    = $2;