while (1) {
   print "@array", "\n";
   last;
}