Select Code to Download

#!/usr/bin/perl -w
use strict;
...
my @chunks = split /\b/, $line;

print Dumper(\@chunks);

#need the grep to filter for truth! 
#basically checking if 
#the element is defined/filled-in/not-blank
my @chunks = grep{$_} split /\b|\s/, $line;

#either this
my @no_punct = $line =~ /(\w+)/g;
#or this
my @no_punct = grep{$_}split /\W|\s/, $line;