From msouthern@exsar.com

In File​::Spec​::Win32->catpath

$volume is "\\\\myserver\\temp"

Line 236 is supposed to a path separator to the end of the volume before
it concatenates it to $directory

  $volume .= $1
  if ( $volume =~ m@​^([\\/])[\\/][^\\/]+[\\/][^\\/]+\Z(?!\n)@​s &&
  $directory =~ m@​^[^\\/]@​s
  ) ;

the pattern match involving $directory is always performed last and does
not save $1.

Maybe it should be;

  $volume .= $1
  if ( $directory =~ m@​^[^\\/]@​s &&
  $volume =~ m@​^([\\/])[\\/][^\\/]+[\\/][^\\/]+\Z(?!\n)@​s
  ) ;

Best regards,

Mark.

p.s. as an aside, could File​::Spec define the path separator as a
constant?

Mark Southern
Informatics
ExSAR Corporation
11 Deer Park Drive Suite 103
Monmouth Junction NJ 08852

This message (including any attachments) may contain confidential
information intended for a specific individual and purpose, and is
protected by law. If you are not the intended recipient, you should
delete this message. Any disclosure, copying, or distribution of this
message, or the taking of any action based on it, is strictly
prohibited.

From @smpeters

[msouthern@​exsar.com - Thu May 08 13​:28​:06 2003]​:

In File​::Spec​::Win32->catpath

$volume is "\\\\myserver\\temp"

Line 236 is supposed to a path separator to the end of the volume
before
it concatenates it to $directory

 $volume \.= $1
     if \( $volume =~ m@​^\(\[\\\\/\]\)\[\\\\/\]\[^\\\\/\]\+\[\\\\/\]\[^\\\\/\]\+\\Z\(?\!\\n\)@​s 

&&

          $directory =~ m@​^\[^\\\\/\]@​s
        \) ;

the pattern match involving $directory is always performed last and
does
not save $1.

Maybe it should be;

$volume \.= $1
if \(  $directory =~ m@​^\[^\\\\/\]@​s &&
      $volume =~ m@​^\(\[\\\\/\]\)\[\\\\/\]\[^\\\\/\]\+\[\\\\/\]\[^\\\\/\]\+\\Z\(?\!\\n\)@​s
   \) ;

A ticket has been created for PathTools also at
https://rt.cpan.org/NoAuth/Bug.html?id=7925.  A script demonstrating
the bug was also included.

The RT System itself - Status changed from 'new' to 'open'

From @schwern

[stmpeters - Thu Oct 07 10​:06​:35 2004]​:

A ticket has been created for PathTools also at
https://rt.cpan.org/NoAuth/Bug.html?id=7925.  A script demonstrating
the bug was also included.

If the ticket's being handled there we don't need an open copy here.
Resolving this.

@schwern - Status changed from 'open' to 'resolved'