my ( $last, $two ) = $string =~ m/(\d+),(\d+)$/;