$inner =~ /^(\w+)/

##</code><code>##

$inner =~ /^(\S+)/

##</code><code>##

print "@firsties\n";
#first greek alpha beta don't can't won't Kindergärten