use strict;
my $string = "das ist ein 5 mit 6 vielen zahlen 55555 drin. das 2 beispiel 3 soll 5 alle 6 zahlen234 fil43tern.";
my @numbers = $string =~ m/(\d+)/g;
print join("\n", @numbers);