The "sometimes" is not an accident without a cause - it happens whenever there is more than one space between words. To split on the pattern that matches the actuality:

@sen = split( /\s+/, $sent );
[download]