@array = (1..9);
while (@array){
  print +(pop @array), "\n";
}