Help for this page
chdir $file; chdir $dir;
#!/usr/bin/env perl use strict; ... mkdir $subdir; ok (-d $subdir); }