.FILE SPLIT PATHNAME

This subroutine is called to separate a full pathname into it's path and name parts.


Usage:

      PASS         <path_part>                FIELD            SHARE? Y
      PASS         <file_part>                FIELD            SHARE? Y
      PASS         <full_pathname>            FIELD            SHARE? N
      GOSUB    --- .FILE SPLIT PATHNAME
      *        check for errors
      IF       --- .FILE SPLIT PATHNAME       NE

Description:

This subroutine is called to separate a full pathname into it's path and file name parts. All parameters are required, if any are missing the subroutine will CANCEL.

<path_part> will contain the path portion of the full file and path name. (Required). This must be PASSed with Share "Y".

<file_part> will contain the file name portion of the full file and path name (Required). This must be PASSed with Share "Y".

<full_pathname> is the full path and file name to separate (Required).

The subroutine identifies the <file_part> by locating all the characters after the last / or \ in <full_filename>. If there aren't any in <full_pathname>, then <full_pathname> will be returned in <file_part> and <path_part> will be empty. See .FILE SPLIT FILENAME to split a file name and extension. Note that results may not be accurate if <full_pathname> contains both \ and / (ie, a Linux path that includes \ to escape characters). A Linux path like "/usr/local/\$money" will correctly return "$money", but a path like "/usr/local/\$mon\*ey" will only return "*ey".

A 'Data was truncated' error will be returned in .FILE SPLIT PATHNAME if the fields you pass are too short to contain either the file name or path.

Comments:

Read what other users have said about this page or add your own comments.


-- PeteBrower - 2011-08-12

Edit | Attach | Watch | Print version | History: r7 < r6 < r5 < r4 < r3 | Backlinks | Raw View | Raw edit | More topic actions...
Topic revision: r4 - 2012-03-23 - JeanNeron
 
  • Edit
  • Attach
This site is powered by the TWiki collaboration platform Powered by PerlCopyright © 2008-2024 by the contributing authors. All material on this collaboration platform is the property of the contributing authors.
Ideas, requests, problems regarding TWiki? Send feedback