[ivank]

Casper
Тут кстати только шеллом обойтись можно, хотя сходу не скажу как.

На перле примерно так выглядеть оно будет:

Код:

#!/usr/bin/perl
for ($i = 0; $i < 500; ++$i)
{
    `tar -xvf ...`;
    `mt fsf`;
}