Help for this page

Select Code to Download


  1. or download this
    47:         my($npath) = unixify($path);
  DB<7> x $path
...
  DB<8> x $npath
0  "/USERS/DIR/aaaaa\c@"     # <---- What's that \c@ doing there?!
  2. or download this
    
47:         my($npath) = unixify($path);
...
  DB<10> x $npath
0  '/USERS/DIR/aaaaaaa/'
  3. or download this
    print File::Spec->catfile("USERS:[DIR.aaaaa]", "file"); # Include USER
+S:, or else this won't work!