my @numbers = ( /(\d+)/g ); print join $/, @numbers, "";