[tpm] Glob problem

[Liam R E Quin]

On Tue, 2009-10-27 at 11:21 -0400, Uri Guttman wrote:

> use File::Slurp ;
> 
> my ($file_name) = map "$from_dir\\$_", grep /${job_no}XX-.*\.txt/,
> 		read_dir $from_dir ;

Oh, that read_dir, I thought you meant readdir() and opendir(), the
built-in posix functions.

File::Find is included with perl-base here and File::Slurp isn't
installed here, but otherwise I don't have strong feelings.

Liam


-- 
Liam Quin - XML Activity Lead, W3C, http://www.w3.org/People/Quin/
Pictures from old books: http://fromoldbooks.org/
Ankh: irc.sorcery.net irc.gnome.org www.advogato.org