Help for this page

Select Code to Download

Select or download this

$wordcount ++ while $buffer =~ m/\b\w+\b/g