1*9a7741deSElliott Hughes{ 2*9a7741deSElliott Hughesfor (i=1; i <= NF; i++) 3*9a7741deSElliott Hughes if ($i ~ /^[a-z]+$/) { 4*9a7741deSElliott Hughes print $i " is alphabetic" 5*9a7741deSElliott Hughes break 6*9a7741deSElliott Hughes } 7*9a7741deSElliott Hughes} 8