in reply to Regex: get first N characters but break at whitespace

my( $start )= /^(.{0,199}\S)\s/;

        - tye (but my friends call me "Tye")