# New Ticket Created by Achim Gratz
# Please include the string: [perl #126834]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=126834 >
The test for the cygdrive prefix can be simplified by using the cygpath
executable instead of parsing the output from df or mount. An
alternative for modern Cygwin would be to use
my $prefix2 = readlink "/proc/cygdrive"
if a fork and some parsing should be avoided and supporting older Cygwin
versions is not considered important.