IO::Path::More - Extends IO::Path to make it more like p5's Path::Class
#Create a path object
$path1 = path 'foo/bar/baz.txt';
$path2 = IO::Path::More.new('/usr/local/bin/perl6');
#We can do anything that IO::Path does
say "file exists" if $path2.e;
my @lines = $path1.open.lines;
# But wait, there's More!
$path3 = path "/new/directory/tree";
$path3.mkpath; # makes /new, /new/directory, and /new/directory/tree
$path3.=append("erf", 'quux.txt'); # "/new/directory/tree/erf/quux.txt"
$path3.touch; # makes an empty "quux.txt" file
path("/new").rmtree # removes everything under "/new"
# Not quite working yet: Foreign paths
# It should work correctly if you run Windows, though.
$WindowsPath = IO::Path::More.new('C:\\bar\\baz\\\\', OS => 'MSWin32');
# ^ don't forget to escape your backslashes
say $WindowsPath; # "C:\bar\baz"
say $WindowsPath.volume; # "C:"
IO::Path::More is intended to be a cross-platform replacement for the built-in IO::Path. Internally, we use File::Spec to deal with all of the issues on differing paths on different operating systems, so you don't have to.
Currently, only Win32 and Unix-type systems are finished (including Mac OS X) in P6 File::Spec, but support should get better as File::Spec gains more OSes.
There are two ways to create an IO::Path::More object. Either though the object interface, or via the path function.
IO::Path::More.new( $mypath );
While you can create a path object with named arguments, you probably shouldn't, unless you don't want path cleanup to happen.
Note that the methods do not actually transform the object, but rather return a new IO::Path::More object. Therefore, if you want to change the path, use a mutating method, like
This module provides a class based interface to all sorts of filesystem related functions on paths:
append( *@parts )
Concatenates anything passed onto the end of the path, and returns the result in a new object. For example,
path("/foo").append(<bar baz/zig>) will return a path of
find(:$name, :$type, Bool :$recursive = True)
Calls File::Find with the given options, which are explained in the File::Find documentation. Note that File::Find is not 100% cross-platform yet, so beware on systems where '/' is not a path separator.
Deletes the current path. Calls unlink if the path is a file, or calls rmdir if the path is a directory. Fails if there are files in the directory, or if you do not have permission to delete the path.
To remove an entire directory with its contents, see
Deletes the path, and all of the contents of that directory. Equivalent
rm -rf on unix boxen. Fails as remove above.
Makes a directory path out of new directories, as necessary. Equivalent
mkdir -p on the a linux machine.
Methods included in IO::Path (notably .open, .close, and .contents) are available here. See S32/IO for details.
Not yet implemented due to missing features in Rakudo:
- touch (needs utime)
- resolve (needs readlink)
- stat (needs stat)
.e, .d, .l, etc...
Builtin methods are reproduced here. Because we inherit from IO::Path, IO::Path::More does IO::Filetestable. See S32/IO for details.
Returns the inode number of the current path as an Int. If you're not on a POSIX system, returns False. Inode numbers uniquely identify files on a given device, and all hard links point to the same inode.
Returns the device number of the current path from a stat call. This is not the same as
.volume, though both identify the disk/drive/partition.
Brent "Labster" Laabs, 2013.
Contact the author at email@example.com or as labster on #perl6. File bug reports on github.
This code is free software, licensed under the same terms as Perl 6; see the LICENSE file for details.
Some methods are based on code originally written by Ken Williams for the Perl 5 module Path::Class.