$ perl t.t one two three