perl -ne '@_=();@_=$_=~/(\w{3,})/g;@_&&print"$.:@_$/"' test.jpg