my @wds = split(/[^\w.]+/);
@wds = @wds[ 2 .. $#wds ];