This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
filelify shouldn't always escape dots.
authorCraig A. Berry <craigberry@mac.com>
Sat, 28 Jan 2012 14:59:09 +0000 (08:59 -0600)
committerCraig A. Berry <craigberry@mac.com>
Sat, 28 Jan 2012 14:59:09 +0000 (08:59 -0600)
commit37769287773a12dbc22e9f93bf7f8c55068aafe2
tree79dd6438cbfa0af944bf9024a245ff02b5261d98
parent656d3f9a2ce7fdcdbecec968ce50147d17c391e1
filelify shouldn't always escape dots.

Follow-up to a9fac63d75d9222a73fbf511ca58ae1d66cbf9a7.  It turns
out that the CRTL doesn't handle the escapes when the path is in
Unix syntax (even though it requires them in native syntax).

  stat('foo/bar.baz.dir;1')

is ok, but

  stat('foo/bar^.baz.dir;1')

fails.  So skip the escaping if there is a slash anywhere in the
path.
vms/vms.c