http://www.perlmonks.org?node_id=1008009


in reply to How to get full path name in windows?

This works for me:

use File::Util; my $f = File::Util->new(); my @files = $f->list_dir( "C:\\book", qw( --no-fsdots --with-paths ) ) +;

From the command line: (demonstrating that "/" works fine on windows)

$ perl -MFile::Util -e 'print join "\n", File::Util->new->list_dir("C: +/book", qw( --no-fsdots --with-paths ))' C:/book/Generic_User_Guide.pdf C:/book/Quick_Guide.pdf
--
Tommy
$ perl -MMIME::Base64 -e 'print decode_base64 "YWNlQHRvbW15YnV0bGVyLm1lCg=="'