printf "%s", ('abcd' =~ /(\w)\w(\w)/ )[0];