for ${*X=\$i[0];*X} ( 1..3 ) { print "$X(@i)$/" }
1()
2()
3()