$test = @test;  #This will be useful in the next statment

##</code><code>##

while( @test ){
   ...
   shift @test;
}