#!just another perl hacker, open+0;print<0>=~/(\b.*)/