Splitting up a filename
Author: stmuk
You want to split a filename into basename, directory etc.
Source code: 09-10-filename-splitting.p6
#!/usr/bin/env perl6 use v6; sub MAIN(:$file = "/usr/lib64/libc.so") { my $io = $file.IO; say "basename: ", $io.basename; say "dirname: ", $io.dirname; say "extension: ", $io.extension; }