load data from a array, ouput css code into a file

build_teamlogo_css.pl

#!/usr/bin/perl

@NBAABB = ('atl', 'bos', 'bkn', 'cha', 'chi', 'cle', 'dal', 'den', 'det', 'gsw', 'hou', 'ind', 'lac', 'lal', 'mem', 'mia', 'mil', 'min', 'nor', 'nyk', 'okc', 'orl', 'phi', 'pho', 'por', 'sac', 'sas', 'tor', 'uth', 'was');


open(FILE, ">_1tmpfile.txt");

foreach (@NBAABB) {
    chomp;
    #syswrite(FILE, '.' .$_. "-theme {\n");
    #syswrite(FILE, "background: #\n}\n");
    syswrite(FILE, "#sub-branding-" .$_. " {\n");
    syswrite(FILE, "background-image: url(../images/teamlogo/" .$_. ".png)!important;\n}\n\n");

}
close(FILE);

<>;