Help for this page
use strict; use warnings; ... { print qq{$dir/$file\n}; }
dirA/. dirA/.. ... dirA/fileC dirA/fileD dirA/fileE