#!/usr/bin/perl
use strict;
use warnings;

for (0..$#ARGV)
{
  print "$_:[$ARGV[$_]]\n";
}

##</code><code>##

my @args = (
  qw(/bin/tar czv), "--exclude-from=$excludes", qw(-f), $storageLocation.$archiveName, $archiveDir
);