Select Code to Download

use strict;
use warnings;
...

chop $chunk;
printf "[%d] %s\n", length($chunk), $chunk;

Use of uninitialized value in length at C:\temp\ws.pl line 15.
Use of uninitialized value in printf at C:\temp\ws.pl line 15.
...
[194] 'I need to extract the first several words from a paragraph of t
+ext contai
ned in a $var, so as to get the longest extract that's less than or eq
+ual to 200
 characters. My brute-force-and-ignorance'