> perl -e 'foo(a a a .. xxxxx)'