Instead of thinking 'picking unique numbers in a range', think 'dealing cards from a deck.'

The List::Util module has a good (fast and suitably random) array shuffler, and then three simple pops or shifts will give you the first three choices.