in reply to mkdir in a loop?

open (FILE, "all_controls.txt") or die "can't open file $!";

my @file=<FILE>;
chomp @file;
foreach my $file (@file)   {
        mkdir "$file";
}

[download]

Regards,
Murugesan Kandasamy
use perl for(;;);

In Section Seekers of Perl Wisdom