unless (/\d/) {
    @words = split(' ', $_);
}