# print a list
print "\nWorking on ", $dir, "\n\n";
# Interpolate
print "\nWorking on $dir\n\n";