use strict;
use warnings;

my @rows = (
    '16444 3M Singapore',
    '10167 ABB Schweiz (CHHOS) - SAP',
    '13916 ABB Turbo Systems AG - LVS',
    '10163 ABB Turbo Systems AG - SAP',
    '8683 ABC',
    );

printf "%6d %s\n", split ' ', $_, 2 for @rows;