Installing a bunch of crap on arch linux through a perl script.

Rewrote the script I made for setting up my music and dev stuff for fedora, in perl:

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

my $pacman;

my @pacman_installs = qw(
xchat screen cpan
wget pcre-devel cmake
gtk+ pygame python-devel
cmake cmake-devel liblo
liblo-devel gcc-c++-devel cmake-gui
libsndfile libsndfile-devel qjackctl
zynaddsubfx vkeybd qtjack-devel
csound csound-devel portmidi
rosegarden4 jamin jack-audio-connection-kit-devel
ctapi-cyberjack-devel zynjacku ardour
nxt_python pybluez
);

&array_cracker();

sub array_cracker(){
foreach(@pacman_installs){
print $_;
$pacman = `pacman -Syq --noconfirm $_`;
print $pacman;
}
}