Select Code to Download

foreach( @results ) {
    $record = $_;
    print $record;
}
@test = $record;
print @test[0];

foreach( @results ) {
    $record = $_;
    print $record;
}
@test = $record
print @test[1];

foreach( @results ) {
    $record = $_;
    print $record;
...
@test = $record
$scalar = $array[0];
print $scaler;