
Path::Abstract::Underload - Path::Abstract without stringification overloading

use Path::Abstract::Underload;
my $path = Path::Abstract::Underload->new("/apple/banana");
# $parent is "/apple"
my $parent = $path->parent;
# $cherry is "/apple/banana/cherry.txt"
my $cherry = $path->child("cherry.txt");

This is a version of Path::Abstract without the magic "use overload ..." stringification.
Unfortunately, without overloading, you can't do this:
my $path = Path::Abstract::Underload->new("/a/path/to/somewhere");
print "$path\n"; # Will print out something like "Path::Abstract::Underload=SCALAR(0xdffaa0)\n"
You'll have to do this instead:
print $path->get, "\n"; Will print out "/a/path/to/somewhere\n"
# Note, you can also use $path->stringify or $path->path
# You could also do this (but it's safer to do one of the above):
print $$path, "\n";
Or, just use Path::Abstract

Create a new Path::Abstract::Underload object using <path> or by joining each <part> with "/"
Returns the new Path::Abstract::Underload object
Create a new Path::Abstract::Underload object using <path> or by joining each <part> with "/"
Returns the new Path::Abstract::Underload object
Returns an exact copy of $path
Set the path of $path to <path> or the concatenation of each <part> (separated by "/")
Returns $path
Returns true if $path is equal to ""
Returns true if $path is equal to "/"
Returns true if $path begins with "/"
path("/a/b")->is_tree # Returns true
path("c/d")->is_tree # Returns false
Returns true if $path does NOT begin with a "/"
path("c/d")->is_branch # Returns true
path("/a/b")->is_branch # Returns false
Change $path by prefixing a "/" if it doesn't have one already
Returns $path
Change $path by removing a leading "/" if it has one
Returns $path
Returns the path in list form by splitting at each "/"
path("c/d")->list # Returns ("c", "d")
path("/a/b/")->last # Returns ("a", "b")
Returns the first part of $path up to the first "/" (but not including the leading slash, if any)
path("c/d")->first # Returns "c"
path("/a/b")->first # Returns "a"
Returns the last part of $path up to the last "/"
path("c/d")->last # Returns "d"
path("/a/b/")->last # Returns "b"
Returns the path in string or scalar form
path("c/d")->list # Returns "c/d"
path("/a/b/")->last # Returns "/a/b"
Modify $path by appending each <part> to the end of \$path, separated by "/"
Returns $path
Make a copy of $path and push each <part> to the end of the new path.
Returns the new child path
Modify $path by removing <count> parts from the end of $path
Returns the removed path as a Path::Abstract::Underload object
Modify $path by removing <count> parts from the end of $path
Returns $path
Make a copy of $path and pop <count> parts from the end of the new path
Returns the new parent path
Create a new Path::Class::File object using $path as a base, and optionally extending it by each <part>
Returns the new file object
Create a new Path::Class::Dir object using $path as a base, and optionally extending it by each <part>
Returns the new dir object