This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Alternate backup file rename test for VMS.
authorCraig A. Berry <craigberry@mac.com>
Fri, 5 Jan 2018 19:54:35 +0000 (13:54 -0600)
committerCraig A. Berry <craigberry@mac.com>
Fri, 5 Jan 2018 19:54:35 +0000 (13:54 -0600)
commita33b278ed39a785690da6bce866fc02aa63eaaaf
tree3ab729d0ba9ad63c233091e56562ece3d1196565
parentb3b7afb8cd9c814f3140e18d1148b7e9f7373f63
Alternate backup file rename test for VMS.

The existing test that made a directory called foo.bak and then
made sure the rename of a backup file from in-place edit failed
to overwrite the directory doesn't work on VMS because there is
no conflict between a file named foo.bak and directory named
[foo^.bak] in directory syntax or foo^.bak.DIR in filename syntax.
The .DIR extension is always there, and other dots in the name
are escaped with caret because dot is the directory delimiter.

So just make version 32767 of foo.bak and when the rename tries
to make the next higher version it will fail.  We're testing what
happens when the rename fails not why it fails, so we accomplish
the same goal via a different mechanism.
t/run/switches.t