print "$w => @wks\n" if grep {/\S/} @wks;