#!/bin/sh
perl -ne 'print /(\w+ )/g'