Select Code to Download

Select or download this
```
my $popCt = 1;
my $markers = 2;
```

sub tester {
  my @holder = @{$HoH{$newcounter}{'holder'}};
  my @ind = @{$HoH{$newcounter}{'individual'}};
  my %HoHMarker = %{$HoH{$newcounter}{'marker'}};

Select or download this

my $newcounter = 1;
tester($newcounter);
...
  my ($newcounter) = @_;
  ...
}

Select or download this

my $args = {
  arg1 => $arg1,
...
  my ($args) = @_;
  ...
}

Select or download this

sub tester {
  my @holder = @{$HoH{$newcounter}{'holder'}};
  die "tester: holder is empty" unless @holder;

Select or download this

my $success = tester();
die "tester failed" unless $success;

Select or download this

my %user_data_lookup;
...
my $safe_input = validate($user_input);
push @{$user_data_lookup{$safe_input}}, @some_array;
...