AWK повторить символ n-раз

как это поэлегантней без циклов? чем тебя циклы не устроили?

perl -E 'say «a"x100'
А в awk циклами

Правильно, зачем циклы. Смотри как элегантно можно сделать без них BEGIN { symbol="-"; count=20 }{ str=sprintf(«%*c»,count,symbol); gsub(" ",symbol,str); print str }

Все же одним оператором не получилось. Значит придется все это убрать в user function,а тогда уж циклом получится короче и яснее:

#Версия с циклом:

function prn( ntimes, char) { for (j=1; j<=ntimes; j++) printf(«%c»,char) }

#Версия с gsub:

function prn( ntimes, char) { str=sprintf(«%*c», ntimes, char) gsub(" ", char,str) printf(«%s», str) }