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