my $n = 3; my @numbers = qw( 3 5 7 2 5 9 8 7 3 6 );