use strict;
use warnings;

my @numbers = 1..10;
print splice (@numbers, rand (@numbers), 1), "\n" while @numbers;