Thanks, now can you explain these lines: What are these doing? require File::Spec; local $_ = File::Spec->catpath(undef,$dir,$f); my $np = File::Spec->catpath(undef,$dir,$f);