map {print '*' x $_ . "\n"} 1..5;