Ah, beutiful. I saw File::Spec (and use it), but I missed File::Basename.

Thanks,
James Mastros,
Just Another Perl Initate