$ perl cli.pl one two three 0: one 1: two 2: three