$string =~ s/^\s+//;
split /\s+/, $string;