If you stored the values in an array rather than printing them directly, you could use uniq from List::MoreUtils, which is a core module.