tie @ary, "My::Class", "some", "el", "ems"; for (@ary) { some_code($_); }