system("archive_tar.pl --tar $tarball --destination_path $some_path");

##</code><code>##

  $tar->extract($some_path);