Select Code to Download

my @vars;
my $second = \$vars[1];
...
  $vars[ $i++ ] = $_;
}
print "second: ", $$second, "\n";