package File_Entry { (has 3 routines, constructor & accessors): sub new([name,[rating]]); filename([name]) rating([rating]) } package File_Entries { use fields qw(__entries);