in reply to untarring number of files

Alternatively, a one-liner:

perl -e 'while(<*.tar>){`tar -xvf $_`;}'

--t. alex
Life is short: get busy!