use strict;
use warnings;

my @srcDirs = ("newDir1", "newDir2");

for my $SRC_DIR (@srcDirs) {
    print "Source dir: '$SRC_DIR'\n";
}