Select Code to Download

#!perl
use strict;
...
for my $act (@{$bi->{customer}->{domain}->{host}->{BACKUPDATA}}){    
  print $act->{ENDDATE_SEC}."\n";
}