copy_files($from, $to, { onProgress => sub { my $progress = shift; print $progress }, filter => '*.jpg' });