You either want to use a shell for a shell job or use Perl's flow control structures to combine simple statements into more complex ones:

move $_, "tmp/$_" for glob 'a*';
[download]

is not that hard(er) to type (than your hypothetical code). Be sure to add the necessary checks!