OK, hard to say whats going wrong when you don't include forkit. Anyway, lets see if we can find some improvements. The only thing I can really make out is smallest. No need to use ls, as it might confuse your forkIt(if you use wait). Try this instead:

smallest{
 my ($dir,$arr_ref)=@_;
 my %sc; #Cache of file sizes;
 return +(sort {$sc{$a}||=-s $a;
                       $sc{$b}||=-s $b;
                       $sc{$a} <=> $sc{$b}
                       } map { "$dir/$_" } @$arr_ref)[0];
}
[download]

That should be efficent enough.

As for the rest, I don't understand what you try to do. You have one main loop. The first thing you do, is to shift a file off  @dbFilePaths. That means it will only go through that loop once for all those filepaths. Inside the loop is one big if/elsif block. So, for each of those FilePath's, one of those blocks will be executed, and finally you fork of, presumably to execute the command you set in the if/elsif block

Furthemore, since you never set @copiedFiles or @verifiedFiles, 2 of those blocks will never get executed. I think you should try to post a version that you feel is somewhat correct, or failing that, put in some comments on what you think is going on in the code

GoldClaw