#!/usr/bin/perl @list=`ls *.tar`; foreach $file(@list) { chomp ($file); system('tar -xvf $file'); } [download]
In reply to untarring number of files by agent