mkdir $a[0], $a[1];

##</code><code>##

for my $d (@a) {
  mkdir $d or die "Couldn't create directory $d: $!";
}