use warnings;
use strict;

$_ = "1.2.17.3 Glückwunschschreiben 12 und";
if ( /(\d+)\.(\d+)\.(\d+)\.(\d+)/ ) {
    print "$1   $2   $3  $4\n";
}

__END__

1   2   17  3