Select Code to Download

@count=`find dir_name -name *.tar`;
@args = qw( tar -x -f );
...
    system(@args) == 0 or die "system '@args' failed: $?";
    pop @args;
}