Select Code to Download

sub parse {
   my ( $self, $resource, $something ) = @_;
   ...
}

for my $i ( 0..@{$resource} - 1 ) {
  ...
}