Never mind, I got it.

I was over thinking it.

I just created one anonymous array with the elements I wanted then used the
following loop.

foreach my $file (@files) {
  print join( "\t", @$file[0], @$file[1] ), "\n";
  $ftp->put(@$file[0], @$file[1]) || die "can't put files: @$file[0] \t
@$file[1] $!";
}


Thanks,

Chris

Reply via email to