while ( <> ) {
    print m/(\w+)/, "\n";
}